Revision: 1.1 - (view) (download) (as text)
1 : | ktanaka | 1.1 | // |
2 : | // | ||
3 : | // | ||
4 : | public final class Symbol extends LispObject{ | ||
5 : | static final Symbol nil=new Symbol("nil"); | ||
6 : | static final Symbol quote=new Symbol("quote"); | ||
7 : | String name; | ||
8 : | Symbol(String name){ this.name=name;} | ||
9 : | public int getType(){ return SYMBOL; } | ||
10 : | public String getName(){ return name;} | ||
11 : | public String toString(){ return name; } | ||
12 : | } |
ktanaka Powered by ViewCVS 1.0-dev |
ViewCVS and CVS Help |