JohnCampbell
Joined: 16 Feb 2006 Posts: 2560 Location: Sydney
|
Posted: Thu Aug 05, 2021 3:01 pm Post subject: Problems using Ver 8.74 clearwin64.dll |
|
|
Since updating to Ver 8.74 (from Ver 8.6) My menu based %gr program does not terminate cleanly.
When selecting exit, it has started giving an error that a file unit was not opened.
" Unit has neither been OPENed nor preconnected at address 1a009481"
in MOUSE_BACK_FUNC at address 112"
I investigated my exit routine Code: | integer*4 function exit_func()
!
! integer*4 :: i
! i = winio@ ('Exit function called.&')
! i = winio@ ('%nl%cn%bt[OK]')
!
call call_back_statistics (' ', -1)
!
call close_output_window
close (unit=98)
!
call report_memory_usage ('last call on exit from saplot')
close (unit=117)
!
! Setting the return value to zero will exit the program.
!
exit_func = 0
end function exit_func |
I first tried moving the close, then commented them out, only to change the response to;
If selecting the menu option "Exit" the program does not terminate, but
If selecting top right X, the program does close.
I am not sure what is the explanation.
I select the menu Exit with:
Code: | integer*4, external :: exit_func
..
i = winio@ ('%mn[[E&xit]]&', exit_func)
|
Old versions of .exe also now don't work normally, as the are using the new clearwin64.dll
Any suggestions where to look ?
I could install Ver 8.8 and see what happens ? |
|