Generate 'use' statements for subroutine calls.

diff --git a/src/ofc/codegen/FortranGenerator.scala b/src/ofc/codegen/FortranGenerator.scala
index 42e73796ae649c5116704401bf16a4cad85dec97..dbf02cc2bfab12c9ed2b6995e88115e3f00cd1af 100644 (file)
--- a/src/ofc/codegen/FortranGenerator.scala
+++ b/src/ofc/codegen/FortranGenerator.scala
@@ -213,7 +213,10 @@ class FortranGenerator {
       case (i : IfStatement) => processIf(i)
       case (a : AllocateStatement) => processAllocate(a)
       case (d : DeallocateStatement) => processDeallocate(d)
-      case (f : FunctionCallStatement) => processFunctionCallStatement(f)
+      case (f : FunctionCallStatement) => {
+        symbolManager.addSymbol(f.getCall.getSignature)
+        processFunctionCallStatement(f)
+      }
       case x => throw new UnimplementedException("Unknown statement type in FORTRAN generator: " + x.toString)
     }
   }