[openfirmware] r1036 - forth/wrapper
svn at openfirmware.info
svn at openfirmware.info
Fri Dec 19 20:06:16 CET 2008
Author: wmb
Date: 2008-12-19 20:06:16 +0100 (Fri, 19 Dec 2008)
New Revision: 1036
Modified:
forth/wrapper/wrapper.c
Log:
Tweaks to wrapper.c for compilation on ARM.
Modified: forth/wrapper/wrapper.c
===================================================================
--- forth/wrapper/wrapper.c 2008-12-19 07:55:27 UTC (rev 1035)
+++ forth/wrapper/wrapper.c 2008-12-19 19:06:16 UTC (rev 1036)
@@ -130,7 +130,7 @@
char *host_os = "freebsd";
#endif
-#ifdef HOSTARM
+#ifdef __arm__
char *host_cpu = "arm";
#define HOST_LITTLE_ENDIAN
#endif
@@ -158,7 +158,6 @@
#ifdef ARM
char *target_cpu = "arm";
-char *host_cpu = "arm";
#define CPU_MAGIC 0xe1a00000
#define START_OFFSET 8
#endif
@@ -937,7 +936,7 @@
#else
-# if defined(HOST_LITTLE_ENDIAN)
+# if defined(TARGET_POWERPC) && defined(HOST_LITTLE_ENDIAN)
lbflips((long *)&header, sizeof(header));
# endif
@@ -1549,6 +1548,7 @@
1200, B1200, 1800, B1800, 2400, B2400,
4800, B4800, 9600, B9600, 19200, B19200,
38400, B38400, 57600, B57600, 115200, B115200,
+#ifdef B230400
230400, B230400,
#ifdef B4000000
@@ -1558,6 +1558,7 @@
2500000, B2500000, 3000000, B3000000, 3500000, B3500000,
4000000, B4000000,
#endif
+#endif
-1, -1,
};
More information about the openfirmware
mailing list