;;; (C) 2008-2009 Dr. Gergo ERDI (in-package :alef) (parse-and-run `(,@*library* (define head ((cons x xs)) x) (define head ((cons x xs)) xs) (define start () (head (cons 1 (cons 2 nil))))))