RosettaCodeData/Task/Singly-linked-list-Element-.../Logo/singly-linked-list-element-...

8 lines
172 B
Plaintext

to insert :after :list :value
localmake "tail member :after :list
if not empty? :tail [.setbf :tail fput :value bf :tail]
output :list
end
show insert 5 [3 5 1 8] 2