pkgsrc/lang/scm/patches/patch-af
2015-12-29 23:34:43 +00:00

42 lines
1.3 KiB
Text

$NetBSD: patch-af,v 1.2 2015/12/29 23:34:55 dholland Exp $
Dragonfly support.
--- scmmain.c.orig 2006-02-08 17:59:55.000000000 +0000
+++ scmmain.c
@@ -43,7 +43,7 @@
Author: Aubrey Jaffer */
/* added by Dai Inukai 2001-03-21*/
-#ifdef __FreeBSD__
+#if defined(__FreeBSD__) || defined(__DragonFly__)
# include <floatingpoint.h>
#endif
@@ -114,7 +114,7 @@ int main(argc, argv)
int nargc, iverbose = 0, buf0stdin;
SCM retval;
/* added by Dai Inukai 2001-03-21 */
-#ifdef __FreeBSD__
+#if defined(__FreeBSD__) || defined(__DragonFly__)
fp_prec_t fpspec;
#endif
@@ -135,7 +135,7 @@ int main(argc, argv)
init_sbrk(); /* Do this before malloc()s. */
#endif
/* added by Dai Inukai 2001-03-21 */
-#ifdef __FreeBSD__
+#if defined(__FreeBSD__) || defined(__DragonFly__)
fpspec = fpsetprec(FP_PE); /* IEEE 64 bit FP mantissa*/
#endif
execpath = 0; /* even when dumped */
@@ -176,7 +176,7 @@ int main(argc, argv)
if (execpath) free(execpath);
execpath = 0;
/* added by Dai Inukai 2001-03-27 */
-#ifdef __FreeBSD__
+#if defined(__FreeBSD__) || defined(__DragonFly__)
fpspec = fpsetprec(fpspec); /* Set back to FP_PD which is 53 bit FP. */
/* This may not be needed because the */
/* kernel is set to FP_PD by default. */