guile.patch 1.4 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152
  1. --- libguile/__scm.h.orig Sat Apr 12 14:16:08 2003
  2. +++ libguile/__scm.h Sun Jun 1 16:32:36 2003
  3. @@ -354,7 +354,8 @@
  4. * that all the state of the process is contained in the stack.
  5. */
  6. -#if defined (sparc) || defined (__sparc__) || defined (__sparc)
  7. +#if (defined (sparc) || defined (__sparc__) || defined (__sparc)) && \
  8. + (!defined(__FreeBSD__))
  9. # define SCM_FLUSH_REGISTER_WINDOWS asm("ta 3")
  10. #else
  11. # define SCM_FLUSH_REGISTER_WINDOWS /* empty */
  12. --- libguile/gc_os_dep.c.orig Wed Apr 16 13:16:21 2003
  13. +++ libguile/gc_os_dep.c Thu May 22 20:41:37 2003
  14. @@ -93,6 +93,14 @@
  15. # define OPENBSD
  16. # define mach_type_known
  17. # endif
  18. +# if defined(__FreeBSD__) && defined(__sparc__)
  19. +# define FREEBSD
  20. +# include <machine/frame.h>
  21. +# define ALIGNMENT 8
  22. +# define CPP_WORDSZ 64
  23. +# define ALIGN_DOUBLE
  24. +# define mach_type_known
  25. +# endif
  26. # if defined(__NetBSD__) && defined(__powerpc__)
  27. # define POWERPC
  28. # define NETBSD
  29. @@ -225,7 +233,11 @@
  30. # define ARM32
  31. # define mach_type_known
  32. # endif
  33. -# if defined(__alpha) || defined(__alpha__)
  34. +# if defined(__FreeBSD__) && defined(__alpha__)
  35. +# define FREEBSD
  36. +# define ALPHA
  37. +# define mach_type_known
  38. +# elif defined(__alpha) || defined(__alpha__)
  39. # define ALPHA
  40. # if !defined(LINUX)
  41. # define OSF1 /* a.k.a Digital Unix */
  42. @@ -1468,7 +1480,7 @@
  43. # include <setjmp.h>
  44. #endif
  45. -#ifdef FREEBSD
  46. +#if defined(FREEBSD) && defined(I386)
  47. # include <machine/trap.h>
  48. #endif