From eb3942e15700f3f4f61b4e46917ae8fbe614e524 Mon Sep 17 00:00:00 2001 From: Matěj Cepl Date: Sun, 19 May 2024 00:42:48 +0200 Subject: Lout 3.41. http://jeffreykingston.id.au/lout/lout-3.41.tar.gz --- z40.c | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) (limited to 'z40.c') 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); -- cgit