Note that there are some explanatory texts on larger screens.

plurals
  1. POWhat Fortran compiler supports these features?
    text
    copied!<p>I've got some legacy code I'm trying to compile, and my available compilers are choking. Here are the lines causing the problems:</p> <p>line 5:</p> <pre><code>DIMENSION MMO(12)/31,28,31,30,31,30,31,31,30,31,30,31/</code></pre> <p>lines 7, 8:</p> <pre><code>DEFINE FILE 4(ANSI,FB,140,3360,0) DEFINE FILE 7(SDF, ,42,42)</code></pre> <p>line 119:</p> <pre><code>1905 FORMAT(J2,J4,J2,29I5)</code></pre> <p>Lahey-Fujistu 95 says:</p> <pre><code>1116-S: "fz32.f", line 5, column 24: Comma expected. 1110-S: "fz32.f", line 5, column 28: Missing name. 1336-S: "fz32.f", line 7, column 7: DEFINE FILE statement not supported. 1336-S: "fz32.f", line 8, column 7: DEFINE FILE statement not supported. 1511-S: "fz32.f", line 119: Invalid character string 'J' found in format specification. 1515-S: "fz32.f", line 119: Edit descriptor must be specified after the repeat specification in a format specification.</code></pre> <p>...and more missing name errors</p> <p>gfortran 77 says:</p> <pre><code>fz32.f:5: DIMENSION MMO(12)/31,28,31,30,31,30,31,31,30,31,30,31/ ^ Invalid form for DIMENSION statement at (^) fz32.f:7: DEFINE FILE 4(ANSI,FB,140,3360,0) 1 2 Unrecognized statement name at (1) and invalid form for assignment or statement-function definition at (2) fz32.f:8: DEFINE FILE 7(SDF, ,42,42) 1 2 Unrecognized statement name at (1) and invalid form for assignment or statement-function definition at (2) fz32.f:119: 1905 FORMAT(J2,J4,J2,29I5) ^ Unrecognized FORMAT specifier at (^) fz32.f:119: 1905 FORMAT(J2,J4,J2,29I5) ^ Unrecognized FORMAT specifier at (^) fz32.f:119: 1905 FORMAT(J2,J4,J2,29I5) ^ Unrecognized FORMAT specifier at (^)</code></pre> <p>gcc fails with similar errors.</p> <p>So does anyone know what compiler could have been used to build this code? </p> <p>Also, on lines 7 and 8, ANSI and SDF are not defined earlier in the code. How do these lines work? I expect them to be formatting flags, but I don't see that documented anywhere.</p>
 

Querying!

 
Guidance

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload