Prims - Implement clear-all, ca

[clnl] / src / main / parse.lisp

diff --git a/src/main/parse.lisp b/src/main/parse.lisp
index 957d177b54792e5a833f371a581b2a7d2c4ca26c..914e0dcbc40770a7e22cd8a3594cdba1458e6e54 100644 (file)
--- a/src/main/parse.lisp
+++ b/src/main/parse.lisp
@@ -246,6 +246,7 @@ DESCRIPTION:
 (defprim :<= (:number :number) :infix)
 (defprim :any? (:agentset))
 (defprim :ask (:agentset :command-block))
+(defprim :ca ())
 (defprim :clear-all ())
 (defprim :crt (:number (:command-block :optional)))
 (defprim :color ())