X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?a=blobdiff_plain;f=src%2Fmain%2Fpackage.lisp;h=d88b67441d1e901974d2d38fd1cb899a8b9d1a37;hb=1dd12dd;hp=964001c62c46bd55a05516c9aab4de247383af56;hpb=82888b4c12ff462e539e9e7746d5268f9c46f330;p=clnl diff --git a/src/main/package.lisp b/src/main/package.lisp index 964001c..d88b674 100644 --- a/src/main/package.lisp +++ b/src/main/package.lisp @@ -33,7 +33,7 @@ other things.")) (defpackage #:clnl-random (:use :common-lisp) (:shadow #:export) - (:export #:export #:set-seed #:next-int #:next-double) + (:export #:export #:set-seed #:next-int #:next-double #:next-long) (:documentation "Wrapper around mt19937. @@ -64,22 +64,32 @@ into an ast that can be transpiled later.")) (defpackage #:clnl-nvm (:use :common-lisp) + (:shadow #:random #:count) (:export #:export-world #:create-world #:current-state ; API as used by transpiled NetLogo programs #:agent-value #:ask + #:count #:create-turtles #:die + #:hatch #:of #:forward #:lookup-color + #:one-of + #:patches #:reset-ticks + #:random #:random-float + #:random-xcor + #:random-ycor + #:setxy #:show #:turtles #:tick #:ticks - #:turn-right #:turn-left) + #:turn-right #:turn-left + #:with) (:documentation "CLNL NVM