aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-object.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/i-object.boot')
-rw-r--r--src/interp/i-object.boot4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/interp/i-object.boot b/src/interp/i-object.boot
index 954d71e4..2ac8ae61 100644
--- a/src/interp/i-object.boot
+++ b/src/interp/i-object.boot
@@ -110,6 +110,10 @@ asTupleAsList(at) == VEC2LIST asTupleAsVector at
--% Basic Object Type Identification
+++ The VAT class for literals values.
+$immediateDataSymbol ==
+ "--immediateData--"
+
++ If x is a literal of the basic types (Integer String DoubleFloat) then
++ this function returns its type, and nil otherwise.
getBasicMode x == getBasicMode0(x,$useIntegerSubdomain)