X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=clnl;a=blobdiff_plain;f=src%2Fmain%2Fmain.lisp;h=eee8e48f48b6e7930f5cff269f6b378a7825b058;hp=09244a02229c2f11e8c54799557cef8dae6985a3;hb=ef8590a;hpb=c11c429d212f7a08391cc117b9facd938cd80e63

diff --git a/src/main/main.lisp b/src/main/main.lisp
index 09244a0..eee8e48 100644
--- a/src/main/main.lisp
+++ b/src/main/main.lisp
@@ -1,26 +1,5 @@
 (in-package #:clnl)
 
-(defvar *model-package* (find-package :cl-user)
- "*MODEL-PACKAGE*
-
-VALUE TYPE:
-
-  a package
-
-INITIAL VALUE:
-
-  The common-lisp-user package
-
-DESCRIPTION:
-
-  *MODEL-PACKAGE* is used for interning symbols as a NetLogo code
-  gets compiled.
-
-  Any local symbols are interned in this package, for use either
-  by other code, or in order to have all symbols interned in the
-  same placakge.  This is also the package in which a model should
-  be run, whether by clnl code or independently.")
-
 (defun e (ast) ast)
 
 (defun r (str)