If you fancy a change from AST... I'd only just started to look at the
code and run ddd. For most purposes LUTABLE is used with the
command-line and no looping.
I display $KAPPA_DIR/m31 then
% lutable
Type a ! in response to a prompt to exit the loop.
MAPPING - Type of scaling between limits /'his'/ >
Reference data object: /home/mjc/classic/bin/kappa/m31
NDF - Image for histogram equalisation /@/home/mjc/classic/bin/kappa/m31/ >
SHADE - Type of shading /-1/ > +1
PERCENTILES - Percentile limits for the histogram /[10,90]/ > 5,95
COLTAB - Kind of colour table /'heat'/ > exte
LUT - NDF containing input LUT /@/home/mjc/classic/bin/kappa/spectrum_lut/ >
MAPPING - Type of scaling between limits /'his'/ >
SHADE - Type of shading /1/ >
PERCENTILES - Percentile limits for the histogram /[5,95]/ >
COLTAB - Kind of colour table /'exte'/ >
Segmentation fault (core dumped)
#0 ndg_asso1_ (param=0x814cb3b, verb=0x40062c00, mode=0xbfffad54, indf=0xbfffa490,
---Type <return> to continue, or q <return> to quit---
fields=0xbfffd2dc, status=0x3, __g77_length_param=4, __g77_length_mode=255,
__g77_length_fields=12) at ndg_asso1.f:116
116 IF ( STATUS .NE. SAI__OK ) RETURN
(gdb) backtrace
#0 ndg_asso1_ (param=0x814cb3b, verb=0x40062c00, mode=0xbfffad54, indf=0xbfffa490,
fields=0xbfffd2dc, status=0x3, __g77_length_param=4, __g77_length_mode=255,
__g77_length_fields=12) at ndg_asso1.f:116
#1 0x402383fb in lpg_assoc_ (param=0x814cb3b, mode=0x40062c00, indf=0xbfffad54,
status=0xbfffd2dc, __g77_length_param=3, __g77_length_mode=4) at lpg_assoc.f:243
#2 0x4004aabb in kpg1_avlut_ (pnlut=0x814cb3b, ndfl=0xbfffad54, pntri=0xbfffad84,
el=0xbfffad8c, status=0xbfffd2dc, __g77_length_pnlut=3) at kpg1_avlut.f:128
#3 0x080809ce in kps1_ltaba_ (nints=0xbfffce70, full=0xbfffce80, imdset=0x82428f8,
pens=0x8243500, status=0xbfffd2dc) at kps1_ltaba.f:712
#4 0x080646bb in lutable_ (status=0xbfffd2dc) at lutable.f:270
#5 0x080523ea in kapview_mon_ (status=0xbfffd2dc) at kapview_mon.f:249
#6 0x08051eb9 in dtask_applic_ (context=0x43323e10, actcode=0xbfffd06c, aname=0xbfffd070,
actptr=0xbfffd058, seq=0xbfffd05c, value=0xbfffd0e0, schedtime=0xbfffd060,
request=0xbfffd064, status=0xbfffd2dc, __g77_length_aname=15,
__g77_length_value=444)
at dtask_applic.f:66
#7 0x43321ece in dtask_obeydcl_ (dtask_applic_=0x8051e60 <dtask_applic_>, name=0xbfffd0d0,
value=0xbfffd0e0, status=0xbfffd2dc, __g77_length_name=15, __g77_length_value=444)
at dts_obeydcl.f:160
#8 0x43320a81 in dtask_dcltask_ (devinit=0x8051e58 <devinit_>,
dtask_applic_=0x8051e60 <dtask_applic_>, status=0xbfffd2dc) at dts_dcltask.f:153
#9 0x08051e40 in MAIN__ () at dtask_main.f:140
#10 0x08091616 in main ()
#11 0x4361f704 in __libc_start_main () from /lib/tls/libc.so.6
It also happens on the svn system too, so it wasn't anything to do with
my restoration of the histogram equalisation generic code that I was
testing when I encountered the SEGV.
The null to exit the loop doesn't seem to go quietly any longer.
Malcolm
|