Changeset 4633
- Timestamp:
- 11/03/03 18:49:20 (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/j/src/org/armedbear/lisp/Condition.java
r4597 r4633 3 3 * 4 4 * Copyright (C) 2003 Peter Graves 5 * $Id: Condition.java,v 1.1 3 2003-11-02 00:24:54piso Exp $5 * $Id: Condition.java,v 1.14 2003-11-03 18:49:20 piso Exp $ 6 6 * 7 7 * This program is free software; you can redistribute it and/or … … 54 54 public LispObject typeOf() 55 55 { 56 LispClass c = getLispClass(); 57 if (c != null) 58 return c.getSymbol(); 56 59 return Symbol.CONDITION; 57 60 } … … 59 62 public LispClass classOf() 60 63 { 64 LispClass c = getLispClass(); 65 if (c != null) 66 return c; 61 67 return BuiltInClass.CONDITION; 62 68 }
Note: See TracChangeset
for help on using the changeset viewer.