Changeset 3925 for trunk/j/src/org/armedbear/lisp/subtypep.lisp

Timestamp:

09/20/03 16:16:52 (20 years ago)

Author:

piso

Message:

(subtypep 'built-in-class 'standard-class) => NIL T

File:

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

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

@@ -2 +2 @@
 ;;;
 ;;; Copyright (C) 2003 Peter Graves
-;;; $Id: subtypep.lisp,v 1.10 2003-09-20 01:26:41 piso Exp $
+;;; $Id: subtypep.lisp,v 1.11 2003-09-20 16:16:52 piso Exp $
 ;;;
 ;;; This program is free software; you can redistribute it and/or
@@ -31 +31 @@
              (BIT-VECTOR VECTOR)
              (BOOLEAN SYMBOL)
-             (BUILT-IN-CLASS STANDARD-CLASS)
+             (BUILT-IN-CLASS CLASS)
              (CELL-ERROR ERROR)
              (CHARACTER)