1.1 ! anton 1: \ ADD.FS Kernal additional things 20may93jaw ! 2: ! 3: \ linked list primitive ! 4: : linked here over @ a, swap ! ; ! 5: ! 6: : discard 0 ?DO drop LOOP ; ! 7: