From: Gerald Jay Sussman <edu/mit/gjs>
Date: Thu, 15 Aug 1991 22:15:04 +0000 (+0000)
Subject: Sony NEWS OS has frexp, floor, modf.
X-Git-Tag: 20090517-FFI~10363
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=ddce401280741fc0628c81987c81efa2ff6b2047;p=mit-scheme.git

Sony NEWS OS has frexp, floor, modf.
---

diff --git a/v7/src/microcode/config.h b/v7/src/microcode/config.h
index 74c232048..6d6fa6fae 100644
--- a/v7/src/microcode/config.h
+++ b/v7/src/microcode/config.h
@@ -1,8 +1,8 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/config.h,v 9.60 1991/08/05 14:21:45 markf Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/config.h,v 9.61 1991/08/15 22:15:04 gjs Exp $
 
-Copyright (c) 1987, 1988, 1989, 1990 Massachusetts Institute of Technology
+Copyright (c) 1987-91 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -398,6 +398,12 @@ typedef unsigned long SCHEME_OBJECT;
 #endif
 #endif
 
+#ifdef sony
+#define HAS_FLOOR
+#define HAS_FREXP
+#define HAS_MODF
+#endif
+
 /* Heap resides in data space which begins at 0x10000000. This is
    kludged by the definitions below, and is still considered
    HEAP_IN_LOW_MEMORY.  */