Changeset 4570


Ignore:
Timestamp:
10/29/03 18:51:37 (18 years ago)
Author:
piso
Message:

CONDITION

File:
1 edited

Legend:

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

    r4318 r4570  
    33 *
    44 * Copyright (C) 2003 Peter Graves
    5  * $Id: BuiltInClass.java,v 1.10 2003-10-11 20:40:53 piso Exp $
     5 * $Id: BuiltInClass.java,v 1.11 2003-10-29 18:51:37 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    7676    public static final BuiltInClass COMPLEX                          = addClass(Symbol.COMPLEX);
    7777    public static final BuiltInClass CONCATENATED_STREAM              = addClass(Symbol.CONCATENATED_STREAM);
    78     public static final BuiltInClass CONDITION                        = addClass(Symbol.CONDITION);
     78//     public static final BuiltInClass CONDITION                        = addClass(Symbol.CONDITION);
    7979    public static final BuiltInClass CONS                             = addClass(Symbol.CONS);
    8080    public static final BuiltInClass CONTROL_ERROR                    = addClass(Symbol.CONTROL_ERROR);
     
    143143
    144144    public static final StandardClass STANDARD_CLASS =
    145         new StandardClass(Symbol.STANDARD_CLASS,
    146                           list1(CLASS_T));
     145        new StandardClass(Symbol.STANDARD_CLASS, list1(CLASS_T));
    147146    static {
    148147        addClass(Symbol.STANDARD_CLASS, STANDARD_CLASS);
     
    150149
    151150    public static final StandardClass STANDARD_OBJECT =
    152         new StandardClass(Symbol.STANDARD_OBJECT,
    153                           list1(CLASS_T));
     151        new StandardClass(Symbol.STANDARD_OBJECT, list1(CLASS_T));
    154152    static {
    155153        addClass(Symbol.STANDARD_OBJECT, STANDARD_OBJECT);
    156154    }
    157155
     156    public static final StandardClass CONDITION =
     157        new StandardClass(Symbol.CONDITION, list1(CLASS_T));
     158    static {
     159        addClass(Symbol.CONDITION, CONDITION);
     160    }
     161
    158162    public static final StandardClass GENERIC_FUNCTION =
    159         new StandardClass(Symbol.GENERIC_FUNCTION,
    160                           list1(FUNCTION));
     163        new StandardClass(Symbol.GENERIC_FUNCTION, list1(FUNCTION));
    161164    static {
    162165        addClass(Symbol.GENERIC_FUNCTION, GENERIC_FUNCTION);
Note: See TracChangeset for help on using the changeset viewer.