Changeset 12568
- Timestamp:
- 03/21/10 10:38:37 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/metaclass/abcl/src/org/armedbear/lisp/Lisp.java
r12461 r12568 1635 1635 } 1636 1636 1637 public final static LispClass checkClass(LispObject obj)1638 1639 {1640 if (obj instanceof LispClass)1641 return (LispClass) obj;1642 return (LispClass)// Not reached.1643 type_error(obj, Symbol.CLASS);1644 }1645 1646 1637 public final static Layout checkLayout(LispObject obj) 1647 1638
Note: See TracChangeset
for help on using the changeset viewer.