Changeset 3627


Ignore:
Timestamp:
09/08/03 17:41:49 (19 years ago)
Author:
piso
Message:

(subtypep 'keyword 'atom) => T T

File:
1 edited

Legend:

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

    r3623 r3627  
    33 *
    44 * Copyright (C) 2003 Peter Graves
    5  * $Id: Type.java,v 1.17 2003-09-08 17:15:47 piso Exp $
     5 * $Id: Type.java,v 1.18 2003-09-08 17:41:49 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    149149    // Subtypes of SYMBOL
    150150    public static final Type BOOLEAN   = new Type(Symbol.BOOLEAN, SYMBOL);
    151     public static final Type KEYWORD   = new Type(Symbol.KEYWORD, SYMBOL);
     151    public static final Type KEYWORD   = new Type(Symbol.KEYWORD, SYMBOL, ATOM);
    152152
    153153    // Subtypes of SEQUENCE
Note: See TracChangeset for help on using the changeset viewer.