|
@@ -0,0 +1,51 @@
|
|
|
|
|
+--- libguile/__scm.h.orig Sat Apr 12 14:16:08 2003
|
|
|
|
|
++++ libguile/__scm.h Sun Jun 1 16:32:36 2003
|
|
|
|
|
+@@ -354,7 +354,8 @@
|
|
|
|
|
+ * that all the state of the process is contained in the stack.
|
|
|
|
|
+ */
|
|
|
|
|
+
|
|
|
|
|
+-#if defined (sparc) || defined (__sparc__) || defined (__sparc)
|
|
|
|
|
++#if (defined (sparc) || defined (__sparc__) || defined (__sparc)) && \
|
|
|
|
|
++ (!defined(__FreeBSD__))
|
|
|
|
|
+ # define SCM_FLUSH_REGISTER_WINDOWS asm("ta 3")
|
|
|
|
|
+ #else
|
|
|
|
|
+ # define SCM_FLUSH_REGISTER_WINDOWS /* empty */
|
|
|
|
|
+--- libguile/gc_os_dep.c.orig Wed Apr 16 13:16:21 2003
|
|
|
|
|
++++ libguile/gc_os_dep.c Thu May 22 20:41:37 2003
|
|
|
|
|
+@@ -93,6 +93,14 @@
|
|
|
|
|
+ # define OPENBSD
|
|
|
|
|
+ # define mach_type_known
|
|
|
|
|
+ # endif
|
|
|
|
|
++# if defined(__FreeBSD__) && defined(__sparc__)
|
|
|
|
|
++# define FREEBSD
|
|
|
|
|
++# include <machine/frame.h>
|
|
|
|
|
++# define ALIGNMENT 8
|
|
|
|
|
++# define CPP_WORDSZ 64
|
|
|
|
|
++# define ALIGN_DOUBLE
|
|
|
|
|
++# define mach_type_known
|
|
|
|
|
++# endif
|
|
|
|
|
+ # if defined(__NetBSD__) && defined(__powerpc__)
|
|
|
|
|
+ # define POWERPC
|
|
|
|
|
+ # define NETBSD
|
|
|
|
|
+@@ -225,7 +233,11 @@
|
|
|
|
|
+ # define ARM32
|
|
|
|
|
+ # define mach_type_known
|
|
|
|
|
+ # endif
|
|
|
|
|
+-# if defined(__alpha) || defined(__alpha__)
|
|
|
|
|
++# if defined(__FreeBSD__) && defined(__alpha__)
|
|
|
|
|
++# define FREEBSD
|
|
|
|
|
++# define ALPHA
|
|
|
|
|
++# define mach_type_known
|
|
|
|
|
++# elif defined(__alpha) || defined(__alpha__)
|
|
|
|
|
+ # define ALPHA
|
|
|
|
|
+ # if !defined(LINUX)
|
|
|
|
|
+ # define OSF1 /* a.k.a Digital Unix */
|
|
|
|
|
+@@ -1468,7 +1480,7 @@
|
|
|
|
|
+ # include <setjmp.h>
|
|
|
|
|
+ #endif
|
|
|
|
|
+
|
|
|
|
|
+-#ifdef FREEBSD
|
|
|
|
|
++#if defined(FREEBSD) && defined(I386)
|
|
|
|
|
+ # include <machine/trap.h>
|
|
|
|
|
+ #endif
|
|
|
|
|
+
|