Prims - Implement =

[clnl] / src / main / transpile.lisp

diff --git a/src/main/transpile.lisp b/src/main/transpile.lisp
index b50b4cdad102286c38f82ec447efd63fcc133d50..5f943678cc0588cdd6562f1188dc43059efdd43d 100644 (file)
--- a/src/main/transpile.lisp
+++ b/src/main/transpile.lisp
@@ -74,6 +74,7 @@ DESCRIPTION:
    *prims*))
 
 ; We count on the parser to handle arguemnts for us, when collating things.
+(defprim := :reporter cl:equalp)
 (defprim :ask :command clnl-nvm:ask)
 (defprim :crt :command clnl-nvm:create-turtles)
 (defprim :fd :command clnl-nvm:forward)