summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/pdftexdir/pdftex.web
diff options
context:
space:
mode:
authorAkira Kakuto <kakuto@fuk.kindai.ac.jp>2016-01-19 08:54:28 +0000
committerAkira Kakuto <kakuto@fuk.kindai.ac.jp>2016-01-19 08:54:28 +0000
commitde944aa8e0c81b76bdab911cc3781d446749d356 (patch)
treed5bbb09777ca41848f42ff6ce11f0ba81732e7d2 /Build/source/texk/web2c/pdftexdir/pdftex.web
parent9055c6e6971ede6f83b85935f995f5775a031263 (diff)
web2c/pdftexdir: avoid to crash for unusual virtual fonts which lead to font size >= 2048pt
git-svn-id: svn://tug.org/texlive/trunk@39428 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/pdftexdir/pdftex.web')
-rw-r--r--Build/source/texk/web2c/pdftexdir/pdftex.web2
1 files changed, 2 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/pdftexdir/pdftex.web b/Build/source/texk/web2c/pdftexdir/pdftex.web
index 6832013a84e..420900b8507 100644
--- a/Build/source/texk/web2c/pdftexdir/pdftex.web
+++ b/Build/source/texk/web2c/pdftexdir/pdftex.web
@@ -13174,6 +13174,7 @@ alpha:integer;
beta:1..16;
begin
alpha:=16;
+ if z>=@'1000000000 then pdf_error("font", "size is too large");
while z>=@'40000000 do
begin z:=z div 2; alpha:=alpha+alpha;
end;
@@ -13207,6 +13208,7 @@ end
@ @<Replace |z|...@>=
begin alpha:=16;
+if z>=@'1000000000 then pdf_error("font", "size is too large");
while z>=@'40000000 do
begin z:=z div 2; alpha:=alpha+alpha;
end;