Silverfrost Forums

Welcome to our forums

Argument number 4 of WINIO@ (continuation 4) should be an ..

9 Mar 2017 1:49 #19013

I have installed FTN95/x64 Ver. 8.10.0 and am getting new error report when running the .exe, that I can not fix ? eg 'Argument number 4 of WINIO@ (Continuation 4) should be an integer at address ...' ( a file name and line number would be much more helpful )

my compile option was ftn95 saplot /window /64 >>ftn95.tce

I changed it to ftn95 saplot /window /64 /inhibit_check 16 >>ftn95.tce

ftn95.cfg in both the local directory and c:\program files (x86) ... /ERROR_NUMBERS /IMPLICIT_NONE /INTL /LOGL

Continuation line 4 is: i = winio@ ('%^gr[grey, user_resize, rgb_colours, full_mouse_input]&', & ix, iy, & ! screen dimension when not maximised w_handle, & ! window handle defined in crtstart mouse_back_func) ! ^ call back function for mouse and resize

w_handle is defined in include <JDC_menu.ins>, as: integer(7) w_handle, ptr_RGB_Address ! new /64 declaration for handles

crtstart.f90 is compiled with ftn95 crtstart /windows /64 >>%tce%

Previously with Ver 8.05 I had the error on (Continuation 112) !! so I commented out this last line of winio@ continuations and it worked.

!zz i = winio@ ('%hw', hw_handle) ! return the handle of the current window. INTEGER(7) HD_HANDLE

I now can't shift this error !!

Any clues ?

John

9 Mar 2017 5:21 #19015

should W_handle be INTEGER(3) ie INTEGER*4 ? Is that what the error implies ?

With the changes to access rights in C:\Program Files (x86)\Silverfrost\ftn95\include, it is not easy to continually change <jdc_menu.ins>

John

9 Mar 2017 7:09 #19016

Yes, the identifier for a %gr surface should be an INTEGER*4.

9 Mar 2017 9:38 #19019

Thanks Paul,

I shall test it out .. It works.

With Ver 8.05, I was getting a similar error with : i = winio@ ('%hw', hw_handle) ! return the handle of the current window. I thought this should be integer(7) hw_handle I could only remove this error by commenting out the line and not using hw_handle functionality. I have not yet tested Ver 8.10 on this line.

Returning the line, Ver 8.05.0 gives the error message 'Argument number 2 of WINIO@ (continuation 113) should be an INTEGER(7) at .. (continuation 113 was not easy to find)

Ver 8.10.0 (after a clean out of the path variable) now does not give an error for compiling winio@ calls, so it appears that this Ver 8.10.0 winio@ warning has fixed up some problems I had.

John

10 Mar 2017 8:10 #19034

%hw returns a Windows handle so it should be INTEGER(7).

Please login to reply.