From 79e04472fb9e3904f137ddb61f70ff45fd32d1e5 Mon Sep 17 00:00:00 2001 From: Akira Kakuto Date: Fri, 27 Nov 2015 22:59:09 +0000 Subject: web2c/dvicopy.ch: Avoid to crash and abort with an error message when the character size is larger than 1024 pt. git-svn-id: svn://tug.org/texlive/trunk@38961 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/web2c/dvicopy.ch | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'Build/source/texk/web2c/dvicopy.ch') diff --git a/Build/source/texk/web2c/dvicopy.ch b/Build/source/texk/web2c/dvicopy.ch index d0c1f9a8b3e..4af1dadd811 100644 --- a/Build/source/texk/web2c/dvicopy.ch +++ b/Build/source/texk/web2c/dvicopy.ch @@ -289,6 +289,15 @@ if full_name then begin end else @z +@x [104] Compute alpha and beta. +alpha:=16; +while z>=@'40000000 do +@y +alpha:=16; +if z>@'400000000 then abort('Character size is too large!'); +while z>=@'40000000 do +@z + @x [108] Declare full_name. @!dvi_loc:int_32; {where we are about to look, in |dvi_file|} @y -- cgit v1.2.3