summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/pdftexdir/pdftex.web
diff options
context:
space:
mode:
authorHan The Thanh <hanthethanh@gmail.com>2010-03-24 13:08:02 +0000
committerHan The Thanh <hanthethanh@gmail.com>2010-03-24 13:08:02 +0000
commitb43a81e1ba916e7daaf0559ae06791e720533e7e (patch)
tree57bab2b37d7272724b32bb0054fc3a8afdff1583 /Build/source/texk/web2c/pdftexdir/pdftex.web
parent0d4e8decfdf61900e814c436111d0f576519213a (diff)
minor fixes for pdftex
git-svn-id: svn://tug.org/texlive/trunk@17547 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/pdftexdir/pdftex.web')
-rw-r--r--Build/source/texk/web2c/pdftexdir/pdftex.web35
1 files changed, 22 insertions, 13 deletions
diff --git a/Build/source/texk/web2c/pdftexdir/pdftex.web b/Build/source/texk/web2c/pdftexdir/pdftex.web
index 0c89a23618f..ff574014306 100644
--- a/Build/source/texk/web2c/pdftexdir/pdftex.web
+++ b/Build/source/texk/web2c/pdftexdir/pdftex.web
@@ -18276,17 +18276,21 @@ begin
selector:=old_setting;
str_room(7);
str_pool[pool_ptr] := 0; { make C string for pdfsetmatrix }
- pdfsetmatrix(str_start[str_ptr], cur_h, cur_page_height - cur_v);
- str_room(7);
- append_char(" ");
- append_char("0");
- append_char(" ");
- append_char("0");
- append_char(" ");
- append_char("c");
- append_char("m");
- s := make_string;
- literal(s, set_origin, false);
+ if pdfsetmatrix(str_start[str_ptr], cur_h, cur_page_height - cur_v) = 1 then begin
+ str_room(7);
+ append_char(" ");
+ append_char("0");
+ append_char(" ");
+ append_char("0");
+ append_char(" ");
+ append_char("c");
+ append_char("m");
+ s := make_string;
+ literal(s, set_origin, false);
+ end
+ else begin
+ pdf_error("\pdfsetmatrix", "Unrecognized format.");
+ end;
flush_str(s);
end;
@@ -35366,8 +35370,13 @@ special_node:special_out(p);
language_node:do_nothing;
pdf_save_pos_node:
@<Save current position in DVI mode@>;
-othercases confusion("ext4")
-@:this can't happen ext4}{\quad ext4@>
+others: begin
+ if (pdftex_first_extension_code <= subtype(p)) and (subtype(p) <= pdftex_last_extension_code) then
+ pdf_error("ext4", "pdf node ended up in DVI mode")
+ else
+ confusion("ext4")
+ @:this can't happen ext4}{\quad ext4@>
+end;
endcases;
end;