Ah, the bad old days.  And here I am in a nostalgia thread.

On Thu, 26 Apr 2018 17:24:38 +0000, Chris Hoelscher wrote:

>Of even older fortran
>If x (100,200,300)
> 
That's a bug.  What did it mean?  But this is valid:
      IF(X)100,200,300

Didn't the expression need to be enclosed in parentheses?

>-----Original Message-----
>From: zMan
>Sent: Thursday, April 26, 2018 1:21 PM
>
>And don't forget the (early):
>
>5 = 3
>
>which, in at least some compiless, would indeed make subsequent references to 
>"5" use "3". I think that was considered a bug.
>
Bug, yes.  But easier to do with subroutine formal parameters.  I had a 
colleague
who wrote a subroutine to generate semilog plots on an impact printer.  Once he
wanted a semilog plot.  He proudly showed me his accommodation:

      CALL LINEAR( 2.718 )
          ....
      SUBROUTINE LINEAR( E )
      E = 1.0
      RETURN

Voila!  Linear!  That's actually one of the few things I wouldn't have done.

Some used a shift routine that overwrote its caller with an inline shift 
instruction.

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to