From 87a0b57ddccbce829e36f94ce154632aec0e95d7 Mon Sep 17 00:00:00 2001 From: Andreas Scherer Date: Sun, 17 Jul 2022 09:55:43 +0000 Subject: 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 --- Build/source/texk/web2c/eptexdir/ChangeLog | 4 ++++ Build/source/texk/web2c/eptexdir/pdfutils.ch | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) (limited to 'Build/source/texk/web2c') 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 + + * pdfutils.ch: Adapt to upstream tex.ch. + 2022-03-21 Karl Berry * 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 @ 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; -- cgit v1.2.3