diff options
author | Andreas Scherer <andreas_tex@freenet.de> | 2022-07-17 09:55:43 +0000 |
---|---|---|
committer | Andreas Scherer <andreas_tex@freenet.de> | 2022-07-17 09:55:43 +0000 |
commit | 87a0b57ddccbce829e36f94ce154632aec0e95d7 (patch) | |
tree | ef8399383279f627b5ba6852a5fc768b74b7fce8 | |
parent | 0a995ebf34310a05dae9beddb282936a16f427ff (diff) |
Adapt pdfutils.ch to recent change in tex.ch.
'make' in 'Work/' fails.
git-svn-id: svn://tug.org/texlive/trunk@63918 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r-- | Build/source/texk/web2c/eptexdir/ChangeLog | 4 | ||||
-rw-r--r-- | Build/source/texk/web2c/eptexdir/pdfutils.ch | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/eptexdir/ChangeLog b/Build/source/texk/web2c/eptexdir/ChangeLog index efe193039ea..1840730be27 100644 --- a/Build/source/texk/web2c/eptexdir/ChangeLog +++ b/Build/source/texk/web2c/eptexdir/ChangeLog @@ -1,3 +1,7 @@ +2022-07-17 Andreas Scherer <https://ascherer.github.io> + + * pdfutils.ch: Adapt to upstream tex.ch. + 2022-03-21 Karl Berry <karl@tug.org> * TL'22 release. diff --git a/Build/source/texk/web2c/eptexdir/pdfutils.ch b/Build/source/texk/web2c/eptexdir/pdfutils.ch index eb567d3583b..611435b9135 100644 --- a/Build/source/texk/web2c/eptexdir/pdfutils.ch +++ b/Build/source/texk/web2c/eptexdir/pdfutils.ch @@ -698,7 +698,7 @@ no_expand: if cur_chr=0 then @<Suppress expansion of the next token@> begin save_scanner_status:=scanner_status; scanner_status:=normal; get_token; scanner_status:=save_scanner_status; t:=cur_tok; back_input; {now |start| and |loc| point to the backed-up token |t|} -if t>=cs_token_flag then +if (t>=cs_token_flag)and(t<>end_write_token) then begin p:=get_avail; info(p):=cs_token_flag+frozen_dont_expand; link(p):=loc; start:=p; loc:=p; end; @@ -708,7 +708,7 @@ end begin save_scanner_status:=scanner_status; scanner_status:=normal; get_token; scanner_status:=save_scanner_status; t:=cur_tok; back_input; {now |start| and |loc| point to the backed-up token |t|} -if t>=cs_token_flag then +if (t>=cs_token_flag)and(t<>end_write_token) then begin p:=get_avail; info(p):=cs_token_flag+frozen_dont_expand; link(p):=loc; start:=p; loc:=p; end; |