From 9565f4ca4aab712f411420fa4c8cae79a2cf88ed Mon Sep 17 00:00:00 2001
From: Ken Sharp <ken.sharp@artifex.com>
Date: Thu, 27 Sep 2018 10:31:03 +0100
Subject: [PATCH] Bug 699813 "filenameforall calls bad iodev with insufficent
 scratch"

This was a regression introduced with commit
65a9046ded8e9edd5d33bc812a9e94ae29607a1e

I hadn't realised the cleanup procedure was expected to be called in the
case of both the success *and* error conditions.
---
 psi/zfile.c | 1 -
 1 file changed, 1 deletion(-)

diff --git a/psi/zfile.c b/psi/zfile.c
index d6575ea..56cc44b 100644
--- a/psi/zfile.c
+++ b/psi/zfile.c
@@ -438,7 +438,6 @@ file_continue(i_ctx_t *i_ctx_p)
             esp -= 5;               /* pop proc, pfen, devlen, iodev , mark */
             return o_pop_estack;
         } else if (code > len) {      /* overran string */
-            esp -= 5;               /* pop proc, pfen, devlen, iodev , mark */
             return_error(gs_error_rangecheck);
         }
         else if (iodev != iodev_default(imemory)
-- 
2.9.1