Changeset 3993

Timestamp:

09/22/03 12:24:08 (20 years ago)

Author:

piso

Message:

CLASSP => PACKAGE_EXT

File:

• trunk/j/src/org/armedbear/lisp/LispClass.java (modified) (4 diffs)

trunk/j/src/org/armedbear/lisp/LispClass.java

@@ -3 +3 @@
  *
  * Copyright (C) 2003 Peter Graves
- * $Id: LispClass.java,v 1.25 2003-09-21 19:48:51 piso Exp $
+ * $Id: LispClass.java,v 1.26 2003-09-22 12:24:08 piso Exp $
  *
  * This program is free software; you can redistribute it and/or
@@ -179 +179 @@
     };
 
+    // ### class-direct-superclasses
     private static final Primitive1 CLASS_DIRECT_SUPERCLASSES =
         new Primitive1("class-direct-superclasses", PACKAGE_SYS, false)
@@ -190 +191 @@
     };
 
+    // ### class-precedence-list
     private static final Primitive1 CLASS_PRECEDENCE_LIST =
         new Primitive1("class-precedence-list", PACKAGE_SYS, false)
@@ -201 +203 @@
     };
 
+    // ### classp
     private static final Primitive1 CLASSP =
-        new Primitive1("classp", PACKAGE_SYS, false)
+        new Primitive1("classp", PACKAGE_EXT, true)
     {
         public LispObject execute(LispObject arg)