Function: primitive-undo

Undo N records from the front of the list LIST.
Return what remains of the list.

(fn N LIST)