From f3249a04a1bc746ed79e9b87acd0983c2c87477a Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Mon, 19 Jun 1989 09:46:29 +0000
Subject: [PATCH] versions for new Pascal compiler

---
 h/pc_err.h  | 2 ++
 h/pc_file.h | 6 +++---
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/h/pc_err.h b/h/pc_err.h
index b34260457..bf72386c7 100644
--- a/h/pc_err.h
+++ b/h/pc_err.h
@@ -13,6 +13,8 @@
 #define	EMOD	71
 #define	EBADF	72
 #define	EFREE	73
+#define EFUNASS	74
+#define EWIDTH	75
 
 #define	EWRITEF	96
 #define	EREADF	97
diff --git a/h/pc_file.h b/h/pc_file.h
index cabc0f12e..3cd9f9dcd 100644
--- a/h/pc_file.h
+++ b/h/pc_file.h
@@ -10,6 +10,8 @@
 #define	WINDOW	04000
 #define	MAGIC	0252
 
+#define	PC_BUFLEN	1024
+
 struct file {
 	char	*ptr;
 	unsigned flags;
@@ -18,7 +20,5 @@ struct file {
 	int	size;
 	int	count;
 	int	buflen;
-	char	bufadr[512];
+	char	bufadr[PC_BUFLEN];
 };
-
-#define	EXTFL(z)	((struct file *)(_hbase + _extfl[z]))
-- 
2.34.1