From 5f8f0ed5cd5d4b4f793c602ed09f9b4bdb98f7e8 Mon Sep 17 00:00:00 2001
From: Keith Packard <keithp@keithp.com>
Date: Sat, 18 Nov 2017 20:38:15 -0800
Subject: altos/lisp: Add 'big' ints -- 24 bits wide

With the default ints being only 14 bits, having a larger type with
more precision seems useful. This is not exposed to the application.

Signed-off-by: Keith Packard <keithp@keithp.com>
---
 src/cortexelf-v1/ao_lisp_os.h | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'src/cortexelf-v1')

diff --git a/src/cortexelf-v1/ao_lisp_os.h b/src/cortexelf-v1/ao_lisp_os.h
index 50c9d40f..27ea7806 100644
--- a/src/cortexelf-v1/ao_lisp_os.h
+++ b/src/cortexelf-v1/ao_lisp_os.h
@@ -23,6 +23,12 @@
 #define AO_LISP_POOL_TOTAL		16384
 #define AO_LISP_SAVE			1
 
+#ifndef __BYTE_ORDER
+#define	__LITTLE_ENDIAN	1234
+#define	__BIG_ENDIAN	4321
+#define __BYTE_ORDER	__LITTLE_ENDIAN
+#endif
+
 static inline int
 ao_lisp_getc() {
 	static uint8_t	at_eol;
-- 
cgit v1.2.3