Skip to content

Instantly share code, notes, and snippets.

@kephas

kephas/si.lisp

Created September 23, 2024 00:54
Show Gist options
  • Save kephas/ebaef5f02167616b1ae3e00ea4b728e9 to your computer and use it in GitHub Desktop.
Save kephas/ebaef5f02167616b1ae3e00ea4b728e9 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
si.lisp
(if (> 1 0)
(print "it's correct")
(print "broken"))
(defmacro si (cond alors sinon)
`(if ,cond ,alors ,sinon))
(defun imprime (valeur)
(print valeur))
(si (> 1 0)
(imprime "c'est correct")
(imprime "cassé"))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment