simon/beowulf
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity
beowulf/resources/sexpr/length.lsp

1 line
77 B
Common Lisp
Raw Blame History

(SETQ LENGTH '(LAMBDA (L) (COND ((EQ NIL L) 0) (T (ADD1 (LENGTH (CDR L)))))))
Reference in a new issue View git blame Copy permalink