aboutsummaryrefslogtreecommitdiff
path: root/src/lib
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/lib
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/lib')
-rw-r--r--src/lib/cfuns-c.c15
1 files changed, 13 insertions, 2 deletions
diff --git a/src/lib/cfuns-c.c b/src/lib/cfuns-c.c
index fb043c9f..4a443b82 100644
--- a/src/lib/cfuns-c.c
+++ b/src/lib/cfuns-c.c
@@ -2,7 +2,7 @@
Copyright (C) 1991-2002, The Numerical Algorithms Group Ltd.
All rights reserved.
- Copyright (C) 2007-2008, Gabriel Dos Reis.
+ Copyright (C) 2007-2009, Gabriel Dos Reis.
All rights reserved.
Redistribution and use in source and binary forms, with or without
@@ -672,6 +672,17 @@ NANQ(void)
#ifdef NAN
return NAN;
#else
- return sqrt(-1.0); /* Juts pick one. */
+ return sqrt(-1.0); /* Just pick one. */
#endif
}
+
+
+OPENAXIOM_EXPORT openaxiom_byteorder
+oa_get_host_byteorder(void)
+{
+#ifdef WORDS_BIGENDIAN
+ return oa_big_endian;
+#else
+ return oa_little_endian;
+#endif
+}