FGLSQLDEBUG causes segmentation fault on -404

/home1/st/q10/source/scott/rtp_replenishments> fglgo4js -V
Four J's Dynamic Virtual Machine Version 3.53.01.25
Built Feb 11 2003 15:43:21
(c) 1989-2003 Four J's Development Tools Ltd
Language support library: Standard ASCII (ISO8859-1)
Database front end : INFORMIX-ESQL VERSION 9.14(a)

or 

Four J's Dynamic Virtual Machine Version 3.54.02.20
Built Sep 17 2004 15:40:12
(c) 1989-2004 Four J's Development Tools
Language support library: Standard ASCII (ISO8859-1)
Database front end : INFORMIX-ESQL VERSION 9.xx (Standard)

With the attached program:
(Taken from a larger program that tries to open a cursor. If it fails with a 
-404 then it prepares the cursor and tries again)

/home1/st/q10/source/scott/rtp_replenishments> export FGLSQLDEBUG=0
/home1/st/q10/source/scott/rtp_replenishments> fglgo4js test.42m
Starting
       -404
Ending
/home1/st/q10/source/scott/rtp_replenishments> export FGLSQLDEBUG=3
/home1/st/q10/source/scott/rtp_replenishments> fglgo4js test.42m
PUTENV:`INFORMIXSERVER=sql9'
PUTENV:`DBCENTURY=C'
PUTENV:`DBPATH=/home1/st/q10'
PUTENV:`INFORMIXDIR=/system/infx730uc5'
PUTENV:`DBDATE=DMY4/'
GETENV:`INFORMIXDIR'=`/system/infx730uc5'
GETENV:`INFORMIXHOST'=`(null)'
GETENV:`INFORMIXSERVICE'=`(null)'
GETENV:`INFORMIXPROTOCOL'=`(null)'
InetLogin.name=USER,val=scott
translate: 0 DATABASE stev
translate: 1 DATABASE stev
EXECUTE
  STATUS:0
  COMMAND:stev
Starting
OPEN
  STATUS:-404
  NAME_fgl:Segmentation Fault (core dumped)
/home1/st/q10/source/scott/rtp_replenishments>

-- 
Regards
Scott Newton

R&D Analyst
Quanta Systems Ltd
3rd Floor, 60 Khyber Pass Road
PO Box 2288, AUCKLAND
Tel: (09) 302 3760
Fax: (09) 302 3784
Website: http://www.quanta.co.nz

The information contained in this email is privileged and confidential and
intended for the addressee only. If you are not the intended recipient, you
are asked to respect that confidentiality and not disclose, copy or make use
of its contents. If received in error you are asked to destroy this email
and contact the sender immediately. Your assistance is appreciated.

DATABASE stev

MAIN

   DISPLAY "Starting"
   CALL test()
   DISPLAY "Ending"

END MAIN

   
FUNCTION v232_prepare()

   WHENEVER ANY ERROR CALL serious_error

   PREPARE read_luk FROM
      "SELECT ludesc, luparam FROM lukup WHERE lutabid = ? AND lucode = ?"
   DECLARE read_luk_cur CURSOR FOR read_luk

END FUNCTION

FUNCTION test()

DEFINE  
   l_lutabid       LIKE lukup.lutabid,
   l_lucode        LIKE lukup.lucode

   WHENEVER ANY ERROR CONTINUE

   OPEN read_luk_cur USING l_lutabid, l_lucode
   DISPLAY STATUS

END FUNCTION

FUNCTION serious_error()
   DISPLAY "Serious error called"
END FUNCTION