From 8740d0b4072bd0f5481be45f13be6997cd3db50c Mon Sep 17 00:00:00 2001
From: Wayne Davison <wayned@users.sourceforge.net>
Date: Wed, 19 Jul 2000 21:09:40 +0000
Subject: Pass the new Eprog argument to hend().

---
 Src/init.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Src/init.c')

diff --git a/Src/init.c b/Src/init.c
index ddb6a4d65..e190cee44 100644
--- a/Src/init.c
+++ b/Src/init.c
@@ -119,14 +119,14 @@ loop(int toplevel, int justonce)
 	intr();			/* interrupts on            */
 	lexinit();              /* initialize lexical state */
 	if (!(prog = parse_event())) {	/* if we couldn't parse a list */
-	    hend();
+	    hend(NULL);
 	    if ((tok == ENDINPUT && !errflag) ||
 		(tok == LEXERR && (!isset(SHINSTDIN) || !toplevel)) ||
 		justonce)
 		break;
 	    continue;
 	}
-	if (hend()) {
+	if (hend(prog)) {
 	    int toksav = tok;
 	    Eprog preprog;
 
-- 
cgit v1.2.3