CodethinkLabs/ofc

SFUNC Declaration Removed From .inc Files

jcburley opened this issue · 1 comments

E.g. note that sfunc is not declared INTEGER in the output here, as well as there being a spurious warning about dummy not being used (in fact, it is used as a parameter in sfunc):

$ cat sfunc.inc
      integer dummy, sfunc
      sfunc(dummy) = dummy + 1
$ ofc --sema-tree sfunc.inc > sfunc-new.inc
Warning:sfunc.inc:1,14:
   Variable 'dummy' declared but not used
      integer dummy, sfunc
              ^
$ cat sfunc-new.inc
        INTEGER :: dummy
        sfunc(dummy) = dummy + 1
 $

Fixed both these bugs, thanks for reporting them.