From 612217f906b5aee43f88304cb7eeae9a608de1e2 Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Fri, 15 Feb 1991 14:54:53 +0000
Subject: [PATCH] Removed some incorrect STATIC's

---
 lang/pc/comp/Makefile   | 2 +-
 lang/pc/comp/chk_expr.c | 4 ++--
 lang/pc/comp/scope.c    | 2 --
 lang/pc/comp/type.c     | 2 --
 4 files changed, 3 insertions(+), 7 deletions(-)

diff --git a/lang/pc/comp/Makefile b/lang/pc/comp/Makefile
index b80a3d7ed..0e4242858 100644
--- a/lang/pc/comp/Makefile
+++ b/lang/pc/comp/Makefile
@@ -54,7 +54,7 @@ INCLUDES =	-I$(MHDIR) -I$(EMHOME)/h -I$(PKGDIR)
 OPTIM=		-O
 CFLAGS =	$(PROFILE) $(INCLUDES) $(OPTIM) $(COPTIONS) -DSTATIC=
 LINTFLAGS =	-DSTATIC= -DNORCSID
-LDFLAGS =	-i $(PROFILE)
+LDFLAGS =	$(PROFILE)
 
 LSRC =	declar.c expression.c program.c statement.c tokenfile.c
 LOBJ =	declar.o expression.o program.o statement.o tokenfile.o
diff --git a/lang/pc/comp/chk_expr.c b/lang/pc/comp/chk_expr.c
index f10ef4764..834aa491a 100644
--- a/lang/pc/comp/chk_expr.c
+++ b/lang/pc/comp/chk_expr.c
@@ -78,7 +78,7 @@ MarkUsed(nd)
 	}
 }
 
-STATIC int
+int
 ChkConstant(expp)
 	register struct node *expp;
 {
@@ -175,7 +175,7 @@ ChkValue(expp)
 }
 #endif
 
-STATIC int
+int
 ChkLinkOrName(expp)
 	register struct node *expp;
 {
diff --git a/lang/pc/comp/scope.c b/lang/pc/comp/scope.c
index 69670746b..f96b6ef4c 100644
--- a/lang/pc/comp/scope.c
+++ b/lang/pc/comp/scope.c
@@ -73,7 +73,6 @@ Forward(nd, tp)
 	fw_type->f_type = tp;
 }
 
-STATIC
 chk_prog_params()
 {
 	/* the program parameters must be global variables of some file type */
@@ -97,7 +96,6 @@ chk_prog_params()
 	}
 }
 
-STATIC
 chk_directives()
 {
 	/* check if all forward declarations are defined */
diff --git a/lang/pc/comp/type.c b/lang/pc/comp/type.c
index 90b00837c..497efe852 100644
--- a/lang/pc/comp/type.c
+++ b/lang/pc/comp/type.c
@@ -499,7 +499,6 @@ FreeForward(for_type)
 	free_forwtype(for_type);
 }
 
-STATIC
 chk_forw_types()
 {
 	/* check all forward references (in pointer types) */
@@ -566,7 +565,6 @@ chk_forw_types()
 	}
 }
 
-STATIC
 TstCaseConstants(nd, sel, sel1)
 	register struct node *nd;
 	register struct selector *sel, *sel1;
-- 
2.34.1