Skip to content

Instantly share code, notes, and snippets.

View juan-reynoso's full-sized avatar
🏠
Working from home

Juan Reynoso juan-reynoso

🏠
Working from home
View GitHub Profile
(defparameter *spam* "million")
(defparameter *emails* '("Reset your password"
"Happy birthday"
"Collect your million dollars now!"))
(defun spam-filter (emails spam)
"Filter emails and returns a list with good-emails and spam-emails"
(let ((spam-emails nil)
(good-emails nil))
@juan-reynoso
juan-reynoso / apply
Last active October 6, 2020 14:56
Common lisp apply
;;Example:
;; 2 + 2 + 2
(apply '+ '(2 2 2))
6