diff options
author | Karl Berry <karl@freefriends.org> | 2017-12-16 18:20:26 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2017-12-16 18:20:26 +0000 |
commit | d8fefdca44a3ffcaaf8adfc035e07344c75a7534 (patch) | |
tree | 5a5df5d10fa5144eb1260f6ff60176950a612c59 /Build/source/texk/web2c/pdftexdir/pdftex.web | |
parent | 11f197866a4719d6a0a30d0b4c8c8a750feb911d (diff) |
(\pdfstrcmp): correct error message [pdftex r788]
git-svn-id: svn://tug.org/texlive/trunk@46076 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/pdftexdir/pdftex.web')
-rw-r--r-- | Build/source/texk/web2c/pdftexdir/pdftex.web | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/pdftexdir/pdftex.web b/Build/source/texk/web2c/pdftexdir/pdftex.web index 52f42f986b5..c7552e264bf 100644 --- a/Build/source/texk/web2c/pdftexdir/pdftex.web +++ b/Build/source/texk/web2c/pdftexdir/pdftex.web @@ -33807,11 +33807,12 @@ procedure compare_strings; {to implement \.{\\pdfstrcmp}} label done; var s1, s2: str_number; i1, i2, j1, j2: pool_pointer; + save_cur_cs: pointer; begin - call_func(scan_toks(false, true)); + save_cur_cs:=cur_cs; call_func(scan_toks(false, true)); s1 := tokens_to_string(def_ref); delete_token_ref(def_ref); - call_func(scan_toks(false, true)); + cur_cs:=save_cur_cs; call_func(scan_toks(false, true)); s2 := tokens_to_string(def_ref); delete_token_ref(def_ref); i1 := str_start[s1]; |