diff options
| author | dos-reis <gdr@axiomatics.org> | 2008-02-14 11:05:41 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2008-02-14 11:05:41 +0000 |
| commit | 3287ad75396e6528ddc6fb7ca722d0b1d2aa75d5 (patch) | |
| tree | ac4979b8eb6ff526cc742ecae92120d488741552 /src/interp | |
| parent | c1123c3229b3321c52b7dabdec68a633ee1e4805 (diff) | |
| download | open-axiom-3287ad75396e6528ddc6fb7ca722d0b1d2aa75d5.tar.gz | |
Update release information
Diffstat (limited to 'src/interp')
| -rw-r--r-- | src/interp/i-object.boot | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/interp/i-object.boot b/src/interp/i-object.boot index 19d27c76..07fda0f6 100644 --- a/src/interp/i-object.boot +++ b/src/interp/i-object.boot @@ -123,7 +123,8 @@ asTupleAsList(at) == VEC2LIST asTupleAsVector at --% Basic Object Type Identification -++ The VAT class for literals values. +++ The VAT class for literal values. Also used in the +++ algebra interface to the interpreter. $immediateDataSymbol == "--immediateData--" @@ -205,6 +206,7 @@ isLeaf x == atom x --may be a number or a vector ++ returns the mode of the VAT node x. +++ Also used by the algebra interface to the interpreter. getMode x == x is [op,:.] => getMode op VECP x => x.1 @@ -219,6 +221,7 @@ putMode(x,y) == ++ returns an interpreter object that represents the value of node x. ++ Note that an interpreter object is a pair of mode and value. +++ Also used by the algebra interface to the interperter. getValue x == VECP x => x.2 atom x => @@ -238,6 +241,7 @@ putValueValue(vec,val) == vec ++ Returns the node class of x, if possible; otherwise nil. +++ Also used by the algebra interface to the interpreter. getUnnameIfCan x == VECP x => x.0 x is [op,:.] => getUnnameIfCan op |