diff options
author | Akira Kakuto <kakuto@fuk.kindai.ac.jp> | 2018-09-08 03:37:12 +0000 |
---|---|---|
committer | Akira Kakuto <kakuto@fuk.kindai.ac.jp> | 2018-09-08 03:37:12 +0000 |
commit | a595d6b4d64cebb81abbd93dcbad84d35a117c32 (patch) | |
tree | 2f2b75e6f5153e0f7b8c5d2740dea417359c27b3 /Master/tlpkg/tlgs/Resource/Init/pdf_rbld.ps | |
parent | 1c29476b23544769439ddfb973d197ead277bfaa (diff) |
recover previous Resource/Init
git-svn-id: svn://tug.org/texlive/trunk@48622 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/tlgs/Resource/Init/pdf_rbld.ps')
-rw-r--r-- | Master/tlpkg/tlgs/Resource/Init/pdf_rbld.ps | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/Master/tlpkg/tlgs/Resource/Init/pdf_rbld.ps b/Master/tlpkg/tlgs/Resource/Init/pdf_rbld.ps index 03654414065..d5e2b11b51c 100644 --- a/Master/tlpkg/tlgs/Resource/Init/pdf_rbld.ps +++ b/Master/tlpkg/tlgs/Resource/Init/pdf_rbld.ps @@ -87,7 +87,7 @@ % Set error flag if we have equal object and generation numbers Generations 4 index get 1 index eq { /dup_obj_gen_num //true def } if } 8 -1 roll { ifelse } { pop if } ifelse % Run 'else' only when rebuilding. -} bind executeonly def +} bind def % Print the contents of the xref array. This actually consists of three % arrays (Objects, Generations, and ObjectStream). @@ -102,7 +102,7 @@ Objects exch get === % print object location } for flush -} bind executeonly def +} bind def % Get token from string and check its type % <string> <type> typed_token <false> % no token or not match @@ -121,7 +121,7 @@ } { pop //false % no token - pop type, set exit status } ifelse % check if we got token -} bind executeonly def +} bind def % Allocate space for post_eof_count to be bound into procedures below. /post_eof_count 0 def @@ -153,7 +153,7 @@ } { pop 0 % no xref, should not happen, report it upstrem } ifelse -} bind executeonly def +} bind def %% Searches backwards from a specified point looking for a 'trailer' keyword. @@ -197,7 +197,7 @@ }if pop % renove the zero leaving the new start position } loop -} bind executeonly def +} bind def % We want the location of the trailer dictionary at the end of file. % We will read the last block of data and search for the final occurance @@ -223,7 +223,7 @@ } { pop pop 0 } ifelse -} bind executeonly def +} bind def % We want to find the trailer dictionary. There is a trailer dictionary % for each xref object list. We only want the trailer dictionary associated @@ -309,7 +309,7 @@ /Trailer exch def pop } ifelse -} bind executeonly def +} bind def % This routine will determine if there is stuff after the %%EOF. There is % supposed to be only a line termination. However many real life files @@ -343,7 +343,7 @@ % Can't even find startxref, assume it's all objects pop 0 } ifelse -} bind executeonly def +} bind def % This routine will scan a file searaching for object locations to build % an alternate version of the data in the xref tables. @@ -422,7 +422,7 @@ pdfformatwarning } if currentdict /Orig_Objects undef -} bind executeonly def +} bind def % Print warning message because we found a problem while reading the xref % tables @@ -436,7 +436,7 @@ ( **** Ghostscript will attempt to recover the data.\n) pdfformaterror ( **** However, the output may be incorrect.\n) pdfformaterror -} bind executeonly def +} bind def % Attempt to recover the XRef data. This is called if we have a failure % while reading the normal XRef tables. This routine usually works @@ -445,4 +445,4 @@ { print_xref_warning % Print warning message count pdfemptycount sub { pop } repeat % remove anything left by readxref search_objects % Search for objects -} bind executeonly def +} bind def |