From: Guillermo J. Rozas <edu/mit/csail/zurich/gjr>
Date: Mon, 3 Feb 1992 23:03:20 +0000 (+0000)
Subject: CPP-time uses of false and true now use FALSE and TRUE.
X-Git-Tag: 20090517-FFI~9900
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=c78883c0f3ea566a3adc355d52174d77653d81b0;p=mit-scheme.git

CPP-time uses of false and true now use FALSE and TRUE.
---

diff --git a/v7/src/microcode/bchmmg.c b/v7/src/microcode/bchmmg.c
index baeba5f64..b589a2197 100644
--- a/v7/src/microcode/bchmmg.c
+++ b/v7/src/microcode/bchmmg.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/bchmmg.c,v 9.67 1992/01/27 17:04:16 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/bchmmg.c,v 9.68 1992/02/03 23:02:15 jinx Exp $
 
 Copyright (c) 1987-1992 Massachusetts Institute of Technology
 
@@ -1833,7 +1833,7 @@ DEFUN (open_gc_file, (size, unlink_p),
      Well, it seems to clobber the string if there are no Xs.
    */
 
-#if 1
+#if TRUE
   position = (strlen (option_gc_file));
   if ((position >= 6)
       && ((strncmp ((option_gc_file + (position - 6)), "XXXXXX", 6)) == 0))
diff --git a/v7/src/microcode/bkpt.c b/v7/src/microcode/bkpt.c
index b7828245f..0f611c3d6 100644
--- a/v7/src/microcode/bkpt.c
+++ b/v7/src/microcode/bkpt.c
@@ -1,8 +1,8 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/bkpt.c,v 9.25 1991/10/29 22:55:11 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/bkpt.c,v 9.26 1992/02/03 23:03:20 jinx Exp $
 
-Copyright (c) 1987-1991 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
@@ -82,7 +82,7 @@ DEFUN_VOID (Handle_Pop_Return_Break)
   Boolean ignore;
   SCHEME_OBJECT *Old_Stack = Stack_Pointer;
 
-  printf ("Pop Return Break: SP = 0x%x\n", Stack_Pointer);
+  printf ("Pop Return Break: SP = 0x%lx\n", Stack_Pointer);
   ignore = (Print_One_Continuation_Frame ());
   Stack_Pointer = Old_Stack;
   return;
@@ -113,4 +113,3 @@ DEFUN_VOID (Pop_Return_Break_Point)
   SP_List = One_Before.next;
   return;
 }
-