Prims - Implement hatch
[clnl] / src / main / parse.lisp
index 622723748d606f2d9bcb8565fc1c6c1c72efa543..640f8c5868357389d330d8634e0ecb4be87e0c29 100644 (file)
@@ -252,9 +252,9 @@ DESCRIPTION:
 (defprim :count (:agentset))
 (defprim :die ())
 (defprim :display ())
-(defprim :with (:reporter-block))
+(defprim :with (:agentset :reporter-block) :infix)
 (defprim :fd (:number))
-(defprim :hatch (:number :command-block))
+(defprim :hatch (:number (:command-block :optional)))
 ; (defprim :let (t t)) ; keeping this here, commented out, to note that it has special processing
 (defprim :if (:boolean :command-block))
 (defprim :if-else (:boolean :command-block :command-block))