- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I have the following bit of code:
!DEC$ FIXEDFORMLINESIZE: 132
!DEC$ REAL:8
!DEC$ REAL:8
program test
real*8 y,x,a,b
integer klo
integer klo
klo = 20
a = 100.0 * (xs(klo+1) - x)
b = 100.0 * (x - xs(klo))
acosh3 = a * ya(klo) + b * ya(klo+1) + (a * (a*a - 1.0) * yd(klo) + b * (b*b - 1.0) * y2a(klo+1)) * 1.0e-4 / 6.0
a = 100.0 * (xs(klo+1) - x)
b = 100.0 * (x - xs(klo))
acosh3 = a * ya(klo) + b * ya(klo+1) + (a * (a*a - 1.0) * yd(klo) + b * (b*b - 1.0) * y2a(klo+1)) * 1.0e-4 / 6.0
end
which doesn't compile (the acosh3 = line is on one line). I get:
D: est est.for(13): Error: Syntax error, found END-OF-STATEMENT when expecting one of: ( ...
It works fine if the line is truncated before column 72 and continued. But this should work as I have set max line length to 132.
Adrian
Link Copied
3 Replies
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Works ok for me in ifort 9.0. What compiler are you using?
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I did a bit more experimenting. I was compling from the VS7 environment - so I tried creating a new project and it worked fine,then I went back into my old project, and it fails. So I checked the command line arguments and found that the /fpp switch is set and that causes the failure, ie.
ifort /fpp /c test.for
fails with the test example (after declaring the4 arrays).
Why?
Adrian
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I guess that fpp isn't recognizing the directive. I'll report that to the developers.

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