View previous topic :: View next topic |
Author |
Message |
Kenneth_Smith
Joined: 18 May 2012 Posts: 697 Location: Hamilton, Lanarkshire, Scotland.
|
Posted: Tue Jan 07, 2020 4:22 pm Post subject: Error 1244 |
|
|
The following subroutine worked in 8.5.
Code: | subroutine get_bitmap_size_data(icon_text,x,y)
include<windows.ins>
character(len=*), intent(in) :: icon_text
integer, intent(out) :: x, y
integer nbbp, ercode
character(len=120) string1
string1 = 'C:/GUI/bitmaps/'//adjustl(trim(icon_text))//'.bmp'
call GET_DIB_SIZE@(trim(string1),x,y,nbbp,ercode)
end subroutine get_bitmap_size_data |
In 8.6 I get the following error at compile time:
error 1244 - The second argument of GET_DIB_SIZE@ is passed as a reference that should not be a constant nor an expression
error 1244 - The third argument of GET_DIB_SIZE@ is passed as a reference that should not be a constant nor an expression
I am also getting a similar error with the following line of code:
Code: | wire(i)%handle(3) = add_graphics_icon@( wire(i)%description(3), wire(i)%x(3), wire(i)%y(3), 0, 0) |
error 1244 - The second argument of ADD_GRAPHICS_ICON@ is passed as a reference that should not be a constant nor an expression
error 1244 - The third argument of ADD_GRAPHICS_ICON@ is passed as a reference that should not be a constant nor an expression
Any ideas of what's amiss?
Thanks
Ken |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7928 Location: Salford, UK
|
Posted: Tue Jan 07, 2020 5:20 pm Post subject: |
|
|
These are false error reports coming from the new argument checking for clearwin.ins. This FTN95 failure has already been fixed for the next release.
In the meantime you can either add "/ignore 1244" to the FTN95 command line or use the earlier form of clearwin.ins that can be downloaded via the following link. This file replaces the clearwin.ins in the FTN95\INCLUDE folder.
https://www.dropbox.com/s/h3xbw38oxqmljx9/CLEARWIN.INS?dl=0 |
|
Back to top |
|
|
Kenneth_Smith
Joined: 18 May 2012 Posts: 697 Location: Hamilton, Lanarkshire, Scotland.
|
Posted: Tue Jan 07, 2020 5:32 pm Post subject: |
|
|
Thanks Paul, /ignore 1244 gets me back to where I was before the holidays. |
|
Back to top |
|
|
LitusSaxonicum
Joined: 23 Aug 2005 Posts: 2388 Location: Yateley, Hants, UK
|
Posted: Wed Jan 08, 2020 4:48 pm Post subject: |
|
|
Or more accurately in terms of causation, to where you were before you got v8.60.
Pedantry award requested for January.
Eddie |
|
Back to top |
|
|
John-Silver
Joined: 30 Jul 2013 Posts: 1520 Location: Aerospace Valley
|
Posted: Sun Jan 19, 2020 8:37 pm Post subject: |
|
|
when is the 'next release' due Paul ? _________________ ''Computers (HAL and MARVIN excepted) are incredibly rigid. They question nothing. Especially input data.Human beings are incredibly trusting of computers and don't check input data. Together cocking up even the simplest calculation ... " |
|
Back to top |
|
|
|