Show HN: A Fortran web framework

Re:Show HN: A Fortran web framework by theophrastus on Monday June 20, 2016 @01:34PM (#11939579)

This was from code originally from about 1978ish, which compiled on a Microsoft Fortran compiler from the 2000s. It looked something like (without indents):

    DO I=1,10000
      ...
      IF (QQQ .LT. RIX70) THEN
         CALL IXNARF( I, J, R1, R7, XL23 )
         GOTO 23
         ...
      END IF
      111 CONTINUE  
    ...
    END

IXNARF could change 'I' (because Fortran 77 passed arguments by reference not value) and sometime after line (er... "card") 23 it might jump back into the loop at 111.

oh and there was like three comments in the whole several thousand lines, including my favorite at the top of one of the main loops:

    C  CHUGGA CHUGGA CHUGGA

[ Parent | on HN ]

Re:Show HN: A Fortran web framework by sevenless on Monday June 20, 2016 @02:58PM (#11940372)

I remember you could change the value of 3 in Fortran 77.

Then there was the proposal for a Fortran COME FROM statement.

http://www.fortran.com/fortran/come_from.html

[ Parent | on HN ]

Re:Show HN: A Fortran web framework by semi-extrinsic on Monday June 20, 2016 @04:05PM (#11941031)

I believe Intercal implements the COME FROM statement.

[ Parent | on HN ]

Re:Show HN: A Fortran web framework by sun_n_surf on Tuesday June 21, 2016 @06:20AM (#11944722)

`C CHUGGA CHUGGA CHUGGA`

I laughed way harder at this that it warranted.

[ Parent | on HN ]