Question about calling Fortran code with "stop"

[Zhu Wang <zhuw@mail.smu.edu>]

Dear all,

I am writing an S-Plus (version 6.1) function on Windows to call a
Fortran code. The Fortran code has something like below:

if(aaa)then
stop

The compiled S-Plus function works fine except that whenever aaa is
TRUE, The Fortran subroutine exits AND the S-Plus session is shutdown
and I have to restart S-Plus. I just do not like this.

My question is how should I change the Fortran code or S-Plus code such
that the Fortran subroutine exits but my S-Plus session is still alive.

Thanks,

-- 
Zhu Wang

Statistical Science Department
Southern Methodist University
Dallas, TX 75275-0332