Fix alpha definition. ldexp is broken for now.

diff --git a/v7/src/microcode/config.h b/v7/src/microcode/config.h
index 94f77435767111828b13cf0a324c123596859c38..e0c73883c07bdd61d867d026e1532894560ce4bb 100644 (file)
--- 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.65 1992/02/03 23:09:44 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/config.h,v 9.66 1992/02/10 13:04:14 jinx Exp $
 
-Copyright (c) 1987-92 Massachusetts Institute of Technology
+Copyright (c) 1987-1992 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -447,7 +447,7 @@ typedef unsigned long SCHEME_OBJECT;
 #define MAX_FLONUM_EXPONENT    1023
 /* Floating point representation uses hidden bit. */
 #define HAS_FLOOR
-#define HAS_FREXP
+/* #define HAS_FREXP */
 #define HAS_MODF
 #endif /* alpha */