summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/uptexdir/upbibtex.ch
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/uptexdir/upbibtex.ch')
-rw-r--r--Build/source/texk/web2c/uptexdir/upbibtex.ch5
1 files changed, 4 insertions, 1 deletions
diff --git a/Build/source/texk/web2c/uptexdir/upbibtex.ch b/Build/source/texk/web2c/uptexdir/upbibtex.ch
index e582e7d69c8..cdd750e9539 100644
--- a/Build/source/texk/web2c/uptexdir/upbibtex.ch
+++ b/Build/source/texk/web2c/uptexdir/upbibtex.ch
@@ -305,7 +305,10 @@ end;
append_char (str_pool[sp_ptr+2]);
if multibytelen(str_pool[sp_ptr]) > 3 then
append_char (str_pool[sp_ptr+3]);
- sp_ptr := sp_ptr + multibytelen(str_pool[sp_ptr])
+ if multibytelen(str_pool[sp_ptr]) > 0 then
+ sp_ptr := sp_ptr + multibytelen(str_pool[sp_ptr])
+ else
+ incr(sp_ptr);
@z
@x