summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/cwebdir/ctangle.w
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/cwebdir/ctangle.w')
-rw-r--r--Build/source/texk/web2c/cwebdir/ctangle.w11
1 files changed, 8 insertions, 3 deletions
diff --git a/Build/source/texk/web2c/cwebdir/ctangle.w b/Build/source/texk/web2c/cwebdir/ctangle.w
index a49869b4dc6..cd462961e24 100644
--- a/Build/source/texk/web2c/cwebdir/ctangle.w
+++ b/Build/source/texk/web2c/cwebdir/ctangle.w
@@ -1243,9 +1243,14 @@ file name.
@ @<In cases that |a| is...@>=@t\1\quad@>
case identifier: store_id(a);
- if (*buffer=='#' && id_first==buffer+1 && id_loc-id_first==5
- && strncmp("endif",id_first,5)==0)
- @<Insert the line number into |tok_mem|@>@;
+ if (*buffer=='#' && @| (
+ ( id_first==buffer+1 && id_loc-id_first==5
+ && strncmp("endif",id_first,5)==0 ) || @|
+ ( id_first==buffer+1 && id_loc-id_first==4
+ && strncmp("else",id_first,4)==0 ) || @|
+ ( id_first==buffer+1 && id_loc-id_first==4
+ && strncmp("elif",id_first,4)==0 ) ) )
+ print_where=true; /* Avoid preprocessor calamities */
break;
case section_name: if (t!=section_name) goto done;
else {