fixed function names

sapfor/experts/Sapfor_2017/_src/Transformations/set_implicit_none.cpp

@@ -181,6 +181,10 @@ static map<char, SgType*> FunctionImplicitCheck(SgStatement* function, const map
 
 void ImplicitCheck(SgFile* file)
 {
+	if (file->filename() == std::string("add.f"))
+	{
+		file->unparsestdout();
+	}
 	map<SgStatement*, map<char, SgType*>> typesByFunctions;
 
 	for (int func = 0; func < file->numberOfFunctions(); ++func)
@@ -190,4 +194,9 @@ void ImplicitCheck(SgFile* file)
 	}
 
 	typesByFunctions.clear();
+
+	if (file->filename() == std::string("add.f"))
+	{
+		file->unparsestdout();
+	}
 }