On 10 Jun 2004 at 09:22 PDT, Aleksandar Donev wrote:
> Dick Hendrickson wrote:
>> the process of execution termination
>> shall include the effect of executing the C exit() function
>> (C International Standard 7.20.4.3)."
>> So, I'd say that executing a STOP does whatever an
>> end program statement does.
> OK, I guess the intention here is that (I assume this is already done)
> Fortran RTL cleanup operations (mostly files) be atexit callbacks
> registered by the compiler at startup. I wonder if I can register my
> own exit callbacks and whether they are called upon executing
> STOP...let me go and try :-)
A slightly non-standard alternative might be to
CALL ABORT()
and turn on signal handling for SIGABRT ...
If the compiler doesn't provide the ABORT function, you can always create a C
routine callable from fortran to do it.
Ted
--
Ted Stern Applications Group
Cray Inc. office: 206-701-2182
411 First Avenue South, Suite 600 cell: 206-383-1049
Seattle, WA 98104-2860 FAX: 206-701-2500
Frango ut patefaciam -- I break that I may reveal
(The Paleontological Society motto, equally apropos for debugging)
|