Skip to content

Instantly share code, notes, and snippets.

@chomy

chomy/suffix.lisp

Created July 24, 2017 10:16
Show Gist options
  • Save chomy/38064e749139551f5de5e280021b0bfc to your computer and use it in GitHub Desktop.
Save chomy/38064e749139551f5de5e280021b0bfc to your computer and use it in GitHub Desktop.
Download ZIP
PFDS: Exercise 2.1
Raw
suffix.lisp
(defun suffix (l)
(labels ((iterator (lst result)
(if (null lst)
result
(iterator (cdr lst) (append result (list lst))))))
(iterator l '())))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment