2 % PostScript encapulator prolog file of the BLT "eps" canvas item.
4 % Copyright 1991-1997 Bell Labs Innovations for Lucent Technologies.
6 % Permission to use, copy, modify, and distribute this software and its
7 % documentation for any purpose and without fee is hereby granted, provided
8 % that the above copyright notice appear in all copies and that both that the
9 % copyright notice and warranty disclaimer appear in supporting documentation,
10 % and that the names of Lucent Technologies any of their entities not be used
11 % in advertising or publicity pertaining to distribution of the software
12 % without specific, written prior permission.
14 % Lucent Technologies disclaims all warranties with regard to this software,
15 % including all implied warranties of merchantability and fitness. In no event
16 % shall Lucent Technologies be liable for any special, indirect or
17 % consequential damages or any damages whatsoever resulting from loss of use,
18 % data or profits, whether in an action of contract, negligence or other
19 % tortuous action, arising out of or in connection with the use or performance
24 % The definitions of the next two macros are from Appendix H of
25 % Adobe's "PostScript Language Reference Manual" pp. 709-736.
28 % Prepare for EPS file
31 /beforeInclusionState save def
32 /dictCount countdictstack def % Save the # objects in the dictionary
33 /opCount count 1 sub def % Count object on operator stack
34 userdict begin % Make "userdict" the current
36 /showpage {} def % Redefine showpage to be null
44 /languagellevel where {
47 false setstrokeadjust false setoverprint
57 countdictstack dictCount sub {
58 end % Clean up dictionary stack
60 beforeInclusionState restore
65 % Set up a clip region based upon a bounding box (x1, y1, x2, y2).