/* -*-C-*-
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/psbtobin.c,v 9.45 1991/08/27 19:36:35 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/psbtobin.c,v 9.46 1992/02/03 22:39:43 jinx Exp $
-Copyright (c) 1987-91 Massachusetts Institute of Technology
+Copyright (c) 1987-92 Massachusetts Institute of Technology
This material was developed by the Scheme project at the Massachusetts
Institute of Technology, Department of Electrical Engineering and
#include "ansidecl.h"
#include "psbmap.h"
#include "float.h"
+#include "limits.h"
#define portable_file input_file
#define internal_file output_file
/*NOTREACHED*/
}
-#define OUT(c) return ((long) ((c) & MAX_CHAR))
+#define OUT(c) return ((long) ((c) & UCHAR_MAX))
long
DEFUN_VOID (read_a_char)
return (To);
}
\f
-#if false
+#if FALSE
void
DEFUN (Move_Memory, (From, N, To),
#endif
-#if false
+#if FALSE
/* This appears to be a fossil. */
int The_Type;
long The_Datum;
-#if false
+#if FALSE
ALIGN_FLOAT (to);
#endif
continue;
}
}
-#if false
+#if FALSE
ALIGN_FLOAT (to);
#endif
return (to);
NPChars,
Size;
-#if 0
+#if FALSE
READ_HEADER ("Portable Version", "%ld", Portable_Version);
#else
if (fscanf (portable_file, "%ld", &Portable_Version) == EOF)
READ_HEADER ("CPU type", "%ld", compiler_processor_type);
READ_HEADER ("Compiled code interface version", "%ld",
compiler_interface_version);
-#if false
+#if FALSE
READ_HEADER ("Compiler utilities vector", "%ld", compiler_utilities);
#endif
/* -*-C-*-
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/psbtobin.c,v 9.45 1991/08/27 19:36:35 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/psbtobin.c,v 9.46 1992/02/03 22:39:43 jinx Exp $
-Copyright (c) 1987-91 Massachusetts Institute of Technology
+Copyright (c) 1987-92 Massachusetts Institute of Technology
This material was developed by the Scheme project at the Massachusetts
Institute of Technology, Department of Electrical Engineering and
#include "ansidecl.h"
#include "psbmap.h"
#include "float.h"
+#include "limits.h"
#define portable_file input_file
#define internal_file output_file
/*NOTREACHED*/
}
-#define OUT(c) return ((long) ((c) & MAX_CHAR))
+#define OUT(c) return ((long) ((c) & UCHAR_MAX))
long
DEFUN_VOID (read_a_char)
return (To);
}
\f
-#if false
+#if FALSE
void
DEFUN (Move_Memory, (From, N, To),
#endif
-#if false
+#if FALSE
/* This appears to be a fossil. */
int The_Type;
long The_Datum;
-#if false
+#if FALSE
ALIGN_FLOAT (to);
#endif
continue;
}
}
-#if false
+#if FALSE
ALIGN_FLOAT (to);
#endif
return (to);
NPChars,
Size;
-#if 0
+#if FALSE
READ_HEADER ("Portable Version", "%ld", Portable_Version);
#else
if (fscanf (portable_file, "%ld", &Portable_Version) == EOF)
READ_HEADER ("CPU type", "%ld", compiler_processor_type);
READ_HEADER ("Compiled code interface version", "%ld",
compiler_interface_version);
-#if false
+#if FALSE
READ_HEADER ("Compiler utilities vector", "%ld", compiler_utilities);
#endif