diff options
Diffstat (limited to 'Build/source/texk/web2c/uptexdir/upbibtex.ch')
-rw-r--r-- | Build/source/texk/web2c/uptexdir/upbibtex.ch | 5 |
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 |