From 9639f0a87bd9a211729db0878e3e90dff9a860bb Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Mon, 12 Jan 1987 15:42:38 +0000
Subject: [PATCH] Also export EM_wordsize and EM_pointersize.

---
 modules/src/read_em/read_em.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/modules/src/read_em/read_em.c b/modules/src/read_em/read_em.c
index 085fa4141..f8a9d4aee 100644
--- a/modules/src/read_em/read_em.c
+++ b/modules/src/read_em/read_em.c
@@ -89,6 +89,7 @@ static long wordmask[] = {	/* allowed bits in a word */
 };
 
 static int wsize, psize;	/* word size and pointer size */
+int EM_wordsize, EM_pointersize;
 
 #ifdef CHECKING
 static char *argrange = "Argument range error";
@@ -128,7 +129,6 @@ EXPORT int
 EM_open(filename)
 	char *filename;
 {
-	
 	if (EM_initialized) {
 		EM_error = "EM_open already called";
 		return 0;
@@ -195,9 +195,11 @@ startmes(p)
 		}
 		argp = ap = getarg(cst_ptyp);
 		wsize = ap->em_cst;
+		EM_wordsize = ap->em_cst;
 		ap->em_next = getarg(cst_ptyp);
 		ap = ap->em_next;
 		psize = ap->em_cst;
+		EM_pointersize = ap->em_cst;
 	}
 }