#64 0..9pre2: gsl_exp segfaults on double arg

[George N. White III]

gdl-pre2 built on Fedora Core 4. I need some other
gsl functions (exponential integrals) and was hoping
that gsl_exp could serve as a model.

GDL> print, gsl_exp(1)
2.71828
GDL> print, gsl_exp(0)
1.00000
GDL> print, gsl_exp(0.d0)
Segmentation fault

(gdb) run
Starting program: /opt/gdl/src/build-pre2/src/gdl
Reading symbols from shared object read from target
memory...done.
Loaded system supplied DSO at 0x8bf000
[Thread debugging using libthread_db enabled]
[New Thread -1208977728 (LWP 18449)]
GDL - GNU Data Language, Version 0.9
For basic information type HELP,/INFO
'GDL_STARTUP'/'IDL_STARTUP' environment variables both
not set.
No startup file read.
GDL> print, gsl_exp(0.d0)

Program received signal SIGSEGV, Segmentation fault.
[Switching to Thread -1208977728 (LWP 18449)]
0x083fa2b0 in lib::print_os (os=0x8617770, e=0xa0b7ad0,
parOffset=0, width=80)
at ../../gdl-0.9pre2/src/print.cpp:115
115 par->ToStream( *os, width, &actPos);
(gdb) where
#0 0x083fa2b0 in lib::print_os (os=0x8617770,
e=0xa0b7ad0, parOffset=0,
width=80) at ../../gdl-0.9pre2/src/print.cpp:115
#1 0x083fa691 in lib::print (e=0xa0b7ad0)
at ../../gdl-0.9pre2/src/print.cpp:80
#2 0x082b5393 in GDLInterpreter::procedure_call
(this=0xbf830eac,
_t=0xa0b8018) at
../../gdl-0.9pre2/src/GDLInterpreter.cpp:680
#3 0x082ac578 in GDLInterpreter::statement
(this=0xbf830eac, _t=0xa0b8018)
at ../../gdl-0.9pre2/src/GDLInterpreter.cpp:150
#4 0x082b7509 in GDLInterpreter::statement_list
(this=0xbf830eac,
_t=0xa0b8018) at
../../gdl-0.9pre2/src/GDLInterpreter.cpp:51
#5 0x082b850d in GDLInterpreter::interactive
(this=0xbf830eac, _t=0xa0b8018)
at ../../gdl-0.9pre2/src/GDLInterpreter.cpp:35
#6 0x0824cb74 in DInterpreter::ExecuteLine
(this=0xbf830eac, in=0x0)
at ../../gdl-0.9pre2/src/dinterpreter.cpp:782
#7 0x0824e781 in DInterpreter::InterpreterLoop
(this=0xbf830eac,
startup=@0xbf830f88) at
../../gdl-0.9pre2/src/dinterpreter.cpp:1135
#8 0x084202e8 in main (argc=1, argv=0xbf831044)
at ../../gdl-0.9pre2/src/gdl.cpp:156

[Joel Gales]

Logged In: YES
user_id=958613

Quick fix is to comment out the line:

e->Guard( dr);

in the gsl_exp function in basic_fun_cl.cpp.

It will be fixed in CVS soon.

Joel