Kenneth_Smith
Joined: 18 May 2012 Posts: 709 Location: Hamilton, Lanarkshire, Scotland.
|
Posted: Fri Apr 07, 2023 2:01 pm Post subject: STOP [message] with WINAPP and /64 |
|
|
I was testing a function routine this morning which should STOP the program (after issuing the error message associated with STOP) if there is a problem with the supplied function arguments.
With the 64 bit compiler and the winapp directive, the program executes the STOP statement, but does not print the desired error message.
Code: | winapp
print*, 'Without this print statement nothing is output to the winapp window under X64'
stop 'Something has gone wrong'
end |
|
|