X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?a=blobdiff_plain;f=src%2Fmain%2Fpackage.lisp;h=e812ac08f83e41f6e4467a7ccba4bc8de11aa08e;hb=471de83db1aee70065808cbc061867e3320bf4b7;hp=a6ca2df874f374bb4b2b56d6956940501f31f6ba;hpb=4a9ed570e6d2c79ac7cac0a6a84d414ee658cd3e;p=clnl

diff --git a/src/main/package.lisp b/src/main/package.lisp
index a6ca2df..e812ac0 100644
--- a/src/main/package.lisp
+++ b/src/main/package.lisp
@@ -1,23 +1,34 @@
-(defpackage #:cl-nl (:use :common-lisp)
- (:export :run :boot :run-commands))
+(defpackage #:clnl (:use :common-lisp)
+ (:export :run :boot :run-commands :run-reporter))
 
-(defpackage #:cl-nl.parser
+(defpackage #:clnl-parser
  (:use :common-lisp)
  (:export :parse))
 
-(defpackage #:cl-nl.random
+(defpackage #:clnl-random
  (:use :common-lisp)
  (:shadow #:export)
  (:export #:export #:set-seed #:next-int #:next-double))
 
-(defpackage #:cl-nl.transpiler
+(defpackage #:clnl-transpiler
  (:use :common-lisp)
- (:export :transpile-commands))
+ (:export :transpile-commands :transpile-reporter))
 
-(defpackage #:cl-nl.nvm
+(defpackage #:clnl-nvm
  (:use :common-lisp)
- (:export :export-world :create-world))
+ (:export :export-world :create-world :dump-object :turtle-color :turtle-xcor :turtle-ycor :turtle-heading
+  ; API as used by transpiled NetLogo programs
+  #:ask
+  #:create-turtles
+  #:forward
+  #:random-float
+  #:show
+  #:turtles))
 
-(defpackage #:cl-nl.lexer
+(defpackage #:clnl-lexer
  (:use :common-lisp)
  (:export :lex))
+
+(defpackage #:clnl-interface
+ (:use :common-lisp)
+ (:export :run :export-view))