Changeset 11456 for trunk/j/src/org

Timestamp:

12/20/08 14:09:27 (14 years ago)

Author:

ehuelsmann

Message:

Remove superfluous IN-PACKAGE.
Move documentation from comment to document-position in DEFVAR and extend it.

File:

• trunk/j/src/org/armedbear/lisp/jvm.lisp (modified) (2 diffs)

trunk/j/src/org/armedbear/lisp/jvm.lisp

@@ -30 +30 @@
 ;;; exception statement from your version.
 
-(in-package "EXTENSIONS")
-
 (in-package "JVM")
 
@@ -281 +279 @@
          nil)))
 
-;; True for local functions defined with FLET or LABELS.
-(defvar *child-p* nil)
+(defvar *child-p* nil
+  "True for local functions created by FLET, LABELS and (NAMED-)LAMBDA")
 
 (defknown find-variable (symbol list) t)