diff options
Diffstat (limited to 'Build/source/texk/web2c/cwebdir/ctangle.w')
-rw-r--r-- | Build/source/texk/web2c/cwebdir/ctangle.w | 11 |
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 { |