aboutsummaryrefslogtreecommitdiff
path: root/src/interp/sys-os.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2009-02-07 22:10:17 +0000
committerdos-reis <gdr@axiomatics.org>2009-02-07 22:10:17 +0000
commit2fbcd8bc4f97cc3e534e11414f5a12dbc08edf2d (patch)
tree25f9002df4057d8e967d22c6f66a2d84378b3bcd /src/interp/sys-os.boot
parent85f1c4d3dc7dc34ae4436d3ef0ffe0b6c6039b5a (diff)
downloadopen-axiom-2fbcd8bc4f97cc3e534e11414f5a12dbc08edf2d.tar.gz
* algebra/system.spad.pamphlet (hostByteOrder$System): New.
* algebra/data.spad.pamphlet (ByteOrder): New. * algebra/Makefile.pamphlet (axiom_algebra_layer_1): Include BYTEORD.
Diffstat (limited to 'src/interp/sys-os.boot')
-rw-r--r--src/interp/sys-os.boot9
1 files changed, 8 insertions, 1 deletions
diff --git a/src/interp/sys-os.boot b/src/interp/sys-os.boot
index 2e9bf84b..f844fba7 100644
--- a/src/interp/sys-os.boot
+++ b/src/interp/sys-os.boot
@@ -234,4 +234,11 @@ minusInfinity() ==
++ otherwise 0.
import std__stream__is__terminal: int -> int for stdStreamIsTerminal
---%
+--% Data layout
+
+++ getHostByteOrder:
+++ returns the byte order of the host machine.
+++ 0: unknown
+++ 1: little endian
+++ 2: big endian
+import oa__get__host__byteorder: () -> int for getHostByteOrder