Changeset 4304


Ignore:
Timestamp:
10/11/03 02:07:28 (19 years ago)
Author:
piso
Message:

STANDARD_OBJECT

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/j/src/org/armedbear/lisp/BuiltInClass.java

    r3974 r4304  
    33 *
    44 * Copyright (C) 2003 Peter Graves
    5  * $Id: BuiltInClass.java,v 1.6 2003-09-21 19:31:21 piso Exp $
     5 * $Id: BuiltInClass.java,v 1.7 2003-10-11 02:07:28 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    123123    public static final BuiltInClass STANDARD_GENERIC_FUNCTION        = addClass(Symbol.STANDARD_GENERIC_FUNCTION);
    124124    public static final BuiltInClass STANDARD_METHOD                  = addClass(Symbol.STANDARD_METHOD);
    125     public static final BuiltInClass STANDARD_OBJECT                  = addClass(Symbol.STANDARD_OBJECT);
     125//     public static final BuiltInClass STANDARD_OBJECT                  = addClass(Symbol.STANDARD_OBJECT);
    126126    public static final BuiltInClass STORAGE_CONDITION                = addClass(Symbol.STORAGE_CONDITION);
    127127    public static final BuiltInClass STREAM                           = addClass(Symbol.STREAM);
     
    141141    public static final BuiltInClass VECTOR                           = addClass(Symbol.VECTOR);
    142142    public static final BuiltInClass WARNING                          = addClass(Symbol.WARNING);
     143
     144    public static final StandardClass STANDARD_OBJECT =
     145        new StandardClass(Symbol.STANDARD_OBJECT,
     146                          list1(CLASS_T));
     147    static {
     148        addClass(Symbol.STANDARD_OBJECT, STANDARD_OBJECT);
     149    }
    143150
    144151    static {
     
    285292        STANDARD_METHOD.setCPL(STANDARD_METHOD, METHOD, STANDARD_OBJECT,
    286293                               CLASS_T);
    287         STANDARD_OBJECT.setDirectSuperclass(CLASS_T);
     294//         STANDARD_OBJECT.setDirectSuperclass(CLASS_T);
    288295        STANDARD_OBJECT.setCPL(STANDARD_OBJECT, CLASS_T);
    289296        STORAGE_CONDITION.setDirectSuperclass(SERIOUS_CONDITION);
Note: See TracChangeset for help on using the changeset viewer.