12 lines
215 B
PostScript
12 lines
215 B
PostScript
|
/ift {
|
||
|
|
4 dict begin
|
||
|
|
[/.if /.then] let*
|
||
|
|
count array astore /.stack exch def
|
||
|
|
/_restore {clear .stack aload pop}.
|
||
|
|
.stack aload pop .if {
|
||
|
|
_restore .then
|
||
|
|
} {
|
||
|
|
_restore
|
||
|
|
} ifelse
|
||
|
|
end}.
|