- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Link Copied
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Please provide a complete test case that demonstrates the problem, not a snippet. Also include a sample data file - you can attach a ZIP with these. Nobody can help you based on the description so far.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I reproduced the problem with the attached code and file (I can't post the real code).
I also noticed something while testing this: if I open the properties of the project and navigate to Fortran->Compatibility and change "Enable F77 run-time compatibility" to NO it works fine. But this was a YES on the 2015 and 2017 computers and it worked fine.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Ok, I can reproduce this in 19.0.5, but it works in the 19.1 beta, so it looks as if the bug was identified and fixed.
Do you really need that option enabled?
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
What options were used to compile bartest.for? I get :
BartTest.for
1>D:\c\vs2019\1949101\ft\ft\BartTest.for(11): error #5149: Illegal character in statement label field
1>D:\c\vs2019\1949101\ft\ft\BartTest.for(11): error #5148: A continuation character is illegal on a line with a statement label
1>D:\c\vs2019\1949101\ft\ft\BartTest.for(11): error #5082: Syntax error, found IDENTIFIER 'A' when expecting one of: :: ) , : * <END-OF-STATEMENT> ; . (/ + - ] /) ' ** > PRIVATE / // ...
1>D:\c\vs2019\1949101\ft\ft\BartTest.for(15): error #5149: Illegal character in statement label field
1>D:\c\vs2019\1949101\ft\ft\BartTest.for(15): error #5148: A continuation character is illegal on a line with a statement label
1>D:\c\vs2019\1949101\ft\ft\BartTest.for(15): error #5082: Syntax error, found IDENTIFIER 'I12' when expecting one of: :: ) , : * <END-OF-STATEMENT> ; . (/ + - ] /) ' ** > PRIVATE / // ...
1>D:\c\vs2019\1949101\ft\ft\BartTest.for(9): error #6052: This label has not been defined as a FORMAT label. [100]
1>compilation aborted for D:\c\vs2019\1949101\ft\ft\BartTest.for (code 1)
1>
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I changed from ".for" to ".f90" and it compiled.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I compile and get no error in debug using 16.3.10 (x86) and 19.0.5.281 [IA-32] with test.txt=
00000000: 20202020 20202020 20203139 20202020 19
00000010: 20202020 20313530 20202020 20202020 150
00000020: 20333030 0D0A0909 2020 300
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
The FORMAT statements don't start in the right columns for .for - I adjusted that.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I fixed ".for" as you wrote, and it compiles, debugs and executes release OK. What am I missing about crash?
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
With "CHARACTER*36 HEADER" the FORMAT I would use is "(A36)". In case the HEADER is defined as "CHARACTER(LEN=1) HEADER(36)" the FORMAT statement will be "(36A1)".
Regards
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I appreciate the feedback here. Until this year, I haven't used Fortran since 1986. It feels like a foreign language now. :(
I work in a very unusual environment, and have been unable to use that PC this week. The code is on a LAN that is detached from the internet. I will get back to it next week, and examine/tinker with other options.
Re: "do we need that option enabled". Disabling it would require a great deal of regression testing, since this is a large code base. I fear disabling it would cause a break in several places. The code is very old (and very complex), and was ported through various releases of Fortran, but stopped at Fortran77.
Any idea when the 19.1 will be released?
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Look for an announcement about PSXE2020 which includes Fortran 19.1 in the next week or so.

- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page