Lout 3.41.HEADmaster

http://jeffreykingston.id.au/lout/lout-3.41.tar.gz

1 files changed, 5 insertions, 4 deletions

diff --git a/z40.c b/z40.c
index 97694a5..2eef714 100644
--- a/z40.c
+++ b/z40.c
@@ -1,7 +1,7 @@
 /*@z40.c:Filter Handler:FilterInit()@*****************************************/
 /*                                                                           */
-/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.39)                       */
-/*  COPYRIGHT (C) 1991, 2008 Jeffrey H. Kingston                             */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.41)                       */
+/*  COPYRIGHT (C) 1991, 2023 Jeffrey H. Kingston                             */
 /*                                                                           */
 /*  Jeffrey H. Kingston (jeff@it.usyd.edu.au)                                */
 /*  School of Information Technologies                                       */
@@ -29,6 +29,7 @@
 /*                                                                           */
 /*****************************************************************************/
 #include "externs.h"
+#include "child.h"
 
 
 static int	filter_count;		/* number of filter files            */
@@ -66,7 +67,7 @@ void FilterInit(void)
 /*****************************************************************************/
 
 OBJECT FilterCreate(BOOLEAN use_begin, OBJECT act, FILE_POS *xfpos)
-{ FULL_CHAR buff[MAX_LINE];  FILE *fp;  OBJECT x, res, junk;
+{ FULL_CHAR buff[MAX_LINE];  FILE *fp;  OBJECT x, res /* , junk */;
   debug3(DFH, D, "FilterCreate(%s, %s, %s)", bool(use_begin),
     SymName(act), EchoFilePos(xfpos));
   New(res, FILTERED);
@@ -81,7 +82,7 @@ OBJECT FilterCreate(BOOLEAN use_begin, OBJECT act, FILE_POS *xfpos)
   filter_actual(x) = act;
   Link(res, x);
   Link(filter_active, x);
-  junk = LexScanVerbatim(fp, use_begin, xfpos, FALSE);
+  /* junk = */ LexScanVerbatim(fp, use_begin, xfpos, FALSE); /* JeffK 17/6/23 */
   fclose(fp);
   sprintf( (char *) buff, "%s%d", FILTER_OUT, filter_count);
   x = MakeWord(WORD, buff, xfpos);