From: Guillermo J. Rozas Date: Thu, 28 Mar 1991 05:23:11 +0000 (+0000) Subject: Change #error into #include "error:.." because HP's cpp does not X-Git-Tag: 20090517-FFI~10809 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=e54a1a1c7cdf0a8c5e36261297b0fde4e0ec9d36;p=mit-scheme.git Change #error into #include "error:.." because HP's cpp does not understand it even though it is in the ANSI standard. --- diff --git a/v7/src/microcode/cmpint.c b/v7/src/microcode/cmpint.c index 727c7d089..8b5d90793 100644 --- a/v7/src/microcode/cmpint.c +++ b/v7/src/microcode/cmpint.c @@ -1,6 +1,6 @@ /* -*-C-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/cmpint.c,v 1.33 1991/03/22 06:27:54 jinx Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/cmpint.c,v 1.34 1991/03/28 05:23:11 jinx Exp $ Copyright (c) 1989-1991 Massachusetts Institute of Technology @@ -2640,7 +2640,7 @@ DEFUN (coerce_to_compiled, #endif #if (REGBLOCK_MINIMUM_LENGTH > COMPILER_REGBLOCK_N_FIXED) -# error "cmpint.c and const.h disagree on REGBLOCK_MINIMUM_LENGTH!" +# include "ERROR: cmpint.c and const.h disagree on REGBLOCK_MINIMUM_LENGTH!" #endif /* ((sizeof(SCHEME_OBJECT)) / (sizeof(SCHEME_OBJECT))) */ diff --git a/v8/src/microcode/cmpint.c b/v8/src/microcode/cmpint.c index 837fa842f..cee80886c 100644 --- a/v8/src/microcode/cmpint.c +++ b/v8/src/microcode/cmpint.c @@ -1,6 +1,6 @@ /* -*-C-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/cmpint.c,v 1.33 1991/03/22 06:27:54 jinx Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/cmpint.c,v 1.34 1991/03/28 05:23:11 jinx Exp $ Copyright (c) 1989-1991 Massachusetts Institute of Technology @@ -2640,7 +2640,7 @@ DEFUN (coerce_to_compiled, #endif #if (REGBLOCK_MINIMUM_LENGTH > COMPILER_REGBLOCK_N_FIXED) -# error "cmpint.c and const.h disagree on REGBLOCK_MINIMUM_LENGTH!" +# include "ERROR: cmpint.c and const.h disagree on REGBLOCK_MINIMUM_LENGTH!" #endif /* ((sizeof(SCHEME_OBJECT)) / (sizeof(SCHEME_OBJECT))) */