improved

dvm/fdvm/trunk/fdvm/acc.cpp

@@ -5358,21 +5358,6 @@ SgExpression * TranslateReductionToOpenmp(SgExpression *reduction_clause)  /* Op
     return OpenMPReductions;
 }
 
-SgStatement *Interface(SgSymbol *s)
-{
-    SgStatement *interface = hasInterface(s); 
-    if (!interface)
-    {
-        interface = getInterface(s);
-        if (isForCudaRegion())
-        { 
-            SaveInterface(s,interface); 
-            MarkAsUserProcedure(s);
-        } 
-    }
-    return interface;
-}
-
 /*
 SgStatement *checkInternal(SgSymbol *s)
 {

dvm/fdvm/trunk/fdvm/calls.cpp

@@ -111,6 +111,20 @@ void SaveInterface(SgSymbol *s, SgStatement *interface)
         GRAPHNODE(s)->st_interface = interface; 
 }
 
+SgStatement *Interface(SgSymbol *s)
+{
+    SgStatement *interface = hasInterface(s); 
+    if (!interface)    
+        interface = getInterface(s);
+    
+    if (isForCudaRegion() && interface)
+    { 
+        SaveInterface(s,interface); 
+        MarkAsUserProcedure(s);
+    }     
+    return interface;
+}
+
 int findParameterNumber(SgSymbol *s, char *name) 
 {
     int i;