X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=clnl;a=blobdiff_plain;f=src%2Fmain%2Ftranspile.lisp;h=b0f90fe504cf1de1f368b477756ea32afb26d68c;hp=4ab75596f5a84c9703df9cf7db55072775f2535f;hb=5f87a9f;hpb=6cb99e3ea911190e3b73adab3a92e75ef36731f1 diff --git a/src/main/transpile.lisp b/src/main/transpile.lisp index 4ab7559..b0f90fe 100644 --- a/src/main/transpile.lisp +++ b/src/main/transpile.lisp @@ -291,3 +291,7 @@ DESCRIPTION: (defcolorprim :brown) (defcolorprim :green) (defcolorprim :white) + +; Boleans +(defprim :true :reporter (lambda () t)) +(defprim :false :reporter (lambda () nil))