projects
/
clnl
/ blobdiff
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Prims - Implement with
[clnl]
/
src
/
main
/
transpile.lisp
diff --git
a/src/main/transpile.lisp
b/src/main/transpile.lisp
index 5914a592eefbf634ed417a44e16375754fd55038..1d4a90c446a0a5f897175023433fd382ee76df36 100644
(file)
--- a/
src/main/transpile.lisp
+++ b/
src/main/transpile.lisp
@@
-175,6
+175,7
@@
DESCRIPTION:
(defsimpleprim :ticks :reporter clnl-nvm:ticks)
(defsimpleprim :turtles :reporter clnl-nvm:turtles)
(defagentvalueprim :who)
(defsimpleprim :ticks :reporter clnl-nvm:ticks)
(defsimpleprim :turtles :reporter clnl-nvm:turtles)
(defagentvalueprim :who)
+(defsimpleprim :with :reporter clnl-nvm:with)
; Colors
(defmacro defcolorprim (color) `(defprim ,color :reporter (lambda () `(clnl-nvm:lookup-color ,,color))))
; Colors
(defmacro defcolorprim (color) `(defprim ,color :reporter (lambda () `(clnl-nvm:lookup-color ,,color))))