diff options
| author | Jeffrey H. Kingston <jeff@it.usyd.edu.au> | 2010-09-14 20:37:45 +0000 |
|---|---|---|
| committer | Jeffrey H. Kingston <jeff@it.usyd.edu.au> | 2010-09-14 20:37:45 +0000 |
| commit | c89f0bc2209f7f98695e6b94fbac316c84fbf9d4 (patch) | |
| tree | 456d506bd18edd3b768eaffa8f70ae93565682e4 /z02.c | |
| parent | 7db8921aac3a0e1223af269ec7092bdd91a7c7a2 (diff) | |
| download | lout-c89f0bc2209f7f98695e6b94fbac316c84fbf9d4.tar.gz | |
Lout 3.25.
git-svn-id: http://svn.savannah.nongnu.org/svn/lout/trunk@19 9365b830-b601-4143-9ba8-b4a8e2c3339c
Diffstat (limited to 'z02.c')
| -rw-r--r-- | z02.c | 11 |
1 files changed, 6 insertions, 5 deletions
@@ -1,7 +1,7 @@ /*@z02.c:Lexical Analyser:Declarations@***************************************/ /* */ -/* THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.24) */ -/* COPYRIGHT (C) 1991, 2000 Jeffrey H. Kingston */ +/* THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.25) */ +/* COPYRIGHT (C) 1991, 2001 Jeffrey H. Kingston */ /* */ /* Jeffrey H. Kingston (jeff@cs.usyd.edu.au) */ /* Basser Department of Computer Science */ @@ -912,9 +912,10 @@ FILE *fp; BOOLEAN end_stop; FILE_POS *err_pos; BOOLEAN lessskip; if( end_stop && StringBeginsWith(p, KW_END) ) { finished = TRUE; } - else if( StringBeginsWith(p, KW_INCLUDE) || - StringBeginsWith(p, KW_SYSINCLUDE) ) - { OBJECT incl_fname, t; FILE *incl_fp; int ch; FILE_NUM fnum; + else if( StringBeginsWithWord(p, KW_INCLUDE) || + StringBeginsWithWord(p, KW_SYSINCLUDE) ) + { + OBJECT incl_fname, t; FILE *incl_fp; int ch; FILE_NUM fnum; BOOLEAN sysinc = StringBeginsWith(p, KW_SYSINCLUDE); clear(); p += sysinc ? StringLength(KW_SYSINCLUDE):StringLength(KW_INCLUDE); |