浏览代码

BUG: Fix in-interface mode. Patch from Maik Beckmann. See bug#5809.

Brad King 18 年之前
父节点
当前提交
ea56464864
共有 1 个文件被更改,包括 4 次插入1 次删除
  1. 4 1
      Source/cmDependsFortran.cxx

+ 4 - 1
Source/cmDependsFortran.cxx

@@ -504,7 +504,10 @@ void cmDependsFortranParser_RuleInclude(cmDependsFortranParser* parser,
 void cmDependsFortranParser_RuleModule(cmDependsFortranParser* parser,
                                        const char* name)
 {
-  parser->Provides.insert(cmSystemTools::LowerCase(name) );
+  if(!parser->InInterface )
+    {
+    parser->Provides.insert(cmSystemTools::LowerCase(name));
+    }
 }
 
 //----------------------------------------------------------------------------