From 5376af0d044acee6f966335f983e90607f9dd749 Mon Sep 17 00:00:00 2001
From: keie <none@none>
Date: Thu, 4 Oct 1984 11:08:42 +0000
Subject: [PATCH] 1 - Added RCS identification. 2 - Removed the default for
 compiler and error file pathname.     These are now always supplied by the
 callee.

---
 util/ack/pc/em_pc.c | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/util/ack/pc/em_pc.c b/util/ack/pc/em_pc.c
index 8187abed2..921e74726 100644
--- a/util/ack/pc/em_pc.c
+++ b/util/ack/pc/em_pc.c
@@ -15,6 +15,8 @@
  *
  */
 
+/* $Header$ */
+
 /*
  * put all the pieces of the pascal part of the EM project together
  *      original author: Johan Stevenson, Vrije Universiteit, Amsterdam
@@ -33,8 +35,8 @@
 
 #define void                    int
 
-char	*pc_path	=	PEM_PATH ;
-char    *err_path       =	ERR_PATH;
+char	*pc_path;
+char    *err_path;
 
 int     toterr;
 int     parent;
@@ -210,6 +212,7 @@ pem(p,q) char *p,*q; {
 	int i;
 	FILE *erfil;
 
+	if ( !pc_path ) fatal("Missing compiler pathname specification\n") ;
 	v = initvector(pc_path);
 	d = tempfile('d');
 	if ((erfil = fopen(d,"w")) == NULL)
@@ -614,6 +617,7 @@ int nexterror() {
 fillindex() {
 	register *ip,n,c;
 
+	if ( !err_path ) fatal("Missing error file name\n") ;
 	if ((mesfil = fopen(err_path,"r")) == NULL)
 		syserr(err_path);
 	ip = index;
-- 
2.34.1