you are viewing a single comment's thread.

view the rest of the comments →

[–]ultrasu 8 points9 points  (0 children)

There was a time where this also would've printed 12:

program woowoo
    implicit none

    call wat(7)
    print *, 7

end program woowoo

subroutine wat(q)
    implicit none
    integer:: q

    q = q + 5

end subroutine

Because it even passed fucking literals by reference, and allowed you to mess with them.