X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=clnl;a=blobdiff_plain;f=src%2Fmain%2Fparse.lisp;h=2f6b77f2a6a859215e44ebeb9d655838f092a2d1;hp=eeadd95d840122cd2b501160eae125f550484020;hb=82888b4c12ff462e539e9e7746d5268f9c46f330;hpb=9413d3737ae1c07d7ec2cad29ef3a6d50ab859a9 diff --git a/src/main/parse.lisp b/src/main/parse.lisp index eeadd95..2f6b77f 100644 --- a/src/main/parse.lisp +++ b/src/main/parse.lisp @@ -239,6 +239,7 @@ DESCRIPTION: (defprim :not (:boolean)) (defprim :nobody ()) (defprim :one-of (t)) +(defprim :of (:reporter-block :agentset) :infix) (defprim :patches ()) (defprim :pcolor ()) (defprim :random (:number)) @@ -258,6 +259,7 @@ DESCRIPTION: (defprim :tick ()) (defprim :ticks ()) (defprim :turtles ()) +(defprim :who ()) ; colors (defprim :black ())