comp.lang.idl-pvwave archive
Messages from Usenet group comp.lang.idl-pvwave, compiled by Paulo Penteado

Home » Public Forums » archive » IDL killer
Show: Today's Messages :: Show Polls :: Message Navigator
E-mail to friend 
Return to the default flat view Create a new topic Submit Reply
Re: IDL killer [message #42294 is a reply to message #42199] Wed, 19 January 2005 14:35 Go to previous messageGo to previous message
Robert Barnett is currently offline  Robert Barnett
Messages: 70
Registered: May 2004
Member
Perhaps we could have a competition to find as many one line killers as
possible.

Here's one, but it's only a 13 liner.

============================================================ ==

I've managed to find an error specific to IDL on Solaris

"SunOS adac9 5.9 Generic sun4u sparc SUNW,Ultra-5_10"

"SunOS adac7 5.9 Generic sun4u sparc SUNW,Ultra-1"

The error occurs in both IDL 6.0 and IDL 6.1 but not in IDL 6.0 on
Windows.


The error occurs when I run the DICOMTEST__TEST1 procedure from the
attached
code.

Running this program results in a core dump of the IDL process.

The problem is related to when I call IDLffDICOM::read as an inherited
method.

If the filename points to a file which does not exist then this will
cause a
segmentation fault (Most likely in the dicom DLM)


This error can be easily avoided by running file_test before
IDLffDICOM::read. Thus, I have managed to avoid this problem.



--

nrb@
Robbie Barnett
imag
Research Assistant
wsahs
Nuclear Medicine & Ultrasound
nsw
Westmead Hospital
gov
Sydney Australia
au
+61 2 9845 7223



; Define the dicomtest class which extends the IDLffDICOM class
pro dicomtest__define
struct = {dicomtest, image: ptr_new(), INHERITS IDLffDICOM }
end

; Define the dicomtest init method
function dicomtest::init
; Return 0 if the superclass did not init
if (NOT (self -> IDLffDICOM::init())) then return, 0
return, 1
end

; This procedure starts and runs the dicomtest wrapper object
pro dicomtest__test1
filename = 'dummyfilename'
help, file_test(filename)
dicom_obj = obj_new('dicomtest')
if (dicom_obj -> read(filename)) then print, 'ok'
end
[Message index]
 
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Previous Topic: Re: Modal dialog - returning values
Next Topic: GDL?

-=] Back to Top [=-
[ Syndicate this forum (XML) ] [ RSS ] [ PDF ]

Current Time: Sat Nov 29 15:07:53 PST 2025

Total time taken to generate the page: 1.84573 seconds