simon/beowulf
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Right, there's an awful lot of Lisp actually working...

Browse source
This commit is contained in:
Simon Brooke 2023-03-30 14:29:20 +01:00
parent c3b327f760
commit 1f16241af7
31 changed files with 250 additions and 97 deletions
Download patch file Download diff file Expand all files Collapse all files

6
resources/sexpr/repeat.lsp Normal file
View file

@ -0,0 +1,6 @@
;; REPEAT is not present in the Lisp 1.5 manual, but it's so simple and so
;; useful that it seems a legitimate extension.
(DEFUN REPEAT (N X)
(COND ((EQ N 0) NIL)
(T (CONS X (REPEAT (SUB1 N) X)))))