From: Guillermo J. Rozas <edu/mit/csail/zurich/gjr>
Date: Wed, 10 Jun 1992 21:44:48 +0000 (+0000)
Subject: Add static keyword to definition of ispunct so there won't be a
X-Git-Tag: 20090517-FFI~9257
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=da00d401ea201ec2042d38da106c7b8f4a681852;p=mit-scheme.git

Add static keyword to definition of ispunct so there won't be a
clonflict with an external routine of the same name.
---

diff --git a/v7/src/microcode/bintopsb.c b/v7/src/microcode/bintopsb.c
index 255902d08..f564a6b84 100644
--- a/v7/src/microcode/bintopsb.c
+++ b/v7/src/microcode/bintopsb.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/bintopsb.c,v 9.51 1992/05/15 03:26:33 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/bintopsb.c,v 9.52 1992/06/10 21:44:48 jinx Exp $
 
 Copyright (c) 1987-1992 Massachusetts Institute of Technology
 
@@ -80,7 +80,7 @@ extern int strlen ();
 static char
   punctuation[] = "'\",<.>/?;:{}[]|`~=+-_()*&^%$#@!";
 
-Boolean
+static Boolean
 DEFUN (ispunct, (c),
        fast char c)
 {
diff --git a/v8/src/microcode/bintopsb.c b/v8/src/microcode/bintopsb.c
index acd03204d..dba359a8f 100644
--- a/v8/src/microcode/bintopsb.c
+++ b/v8/src/microcode/bintopsb.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/bintopsb.c,v 9.51 1992/05/15 03:26:33 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/bintopsb.c,v 9.52 1992/06/10 21:44:48 jinx Exp $
 
 Copyright (c) 1987-1992 Massachusetts Institute of Technology
 
@@ -80,7 +80,7 @@ extern int strlen ();
 static char
   punctuation[] = "'\",<.>/?;:{}[]|`~=+-_()*&^%$#@!";
 
-Boolean
+static Boolean
 DEFUN (ispunct, (c),
        fast char c)
 {