🚀 go-pugleaf

I found the problem.

The filter is automatically closed at the end of /readdata the 1st time you execute it.
If you call readdata again (with a second EPS file) it returns NULL and executes the postscript bytes in the 2nd EPS file instead of reading them into the string buffer.

The solution involves moving the define of the filter inside of the /readdata procedure.

OLD CODE:
-----------------------------------------
/buffer 16000 string def
/inputFile currentfile 0 (% $$EPS_EOD_Marker$$) /SubFileDecode filter def

/readdata { % array readdata --
   1 { % put counter on stack
---------------------------------------------

FIXED CODE:
-----------------------------------------
/buffer 16000 string def

/readdata { % array readdata --
   /inputFile currentfile 0 (% $$EPS_EOD_Marker$$) /SubFileDecode filter def

1 { % put counter on stack
---------------------------------------------

Looks like Technical Note #5144 could use a little updating!

I found this bug using the Postscript debugger PSAlter
The tool is a few years old but it works great!!

Mike M.