diff options
Diffstat (limited to 'src/interp/sys-utility.boot')
-rw-r--r-- | src/interp/sys-utility.boot | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/src/interp/sys-utility.boot b/src/interp/sys-utility.boot index 2d334946..31781fae 100644 --- a/src/interp/sys-utility.boot +++ b/src/interp/sys-utility.boot @@ -47,6 +47,17 @@ $COMBLOCKLIST := nil %nothing == KEYWORD::%OpenAxiomNoValue +++ Constants describing byte order +%littleEndian == KEYWORD::%littleEndian +%bigEndian == KEYWORD::%bigEndian +%unknownEndian == KEYWORD::%unknownEndian + +++ The byte order of the host machine running OpenAxiom. +%hostByteOrder == + getHostByteOrder() = 1 => %littleEndian + getHostByteOrder() = 2 => %bigEndian + %unknownEndian + --% ++ getVMType returns an approximation of the underlying object type |