Changeset 628 for CMT/HEAD/source/cmt_parser.cxx

Timestamp:

Jan 11, 2013, 11:23:19 AM (11 years ago)

Author:

rybkin

Message:

See C.L. 499

File:

• CMT/HEAD/source/cmt_parser.cxx (modified) (1 diff)

CMT/HEAD/source/cmt_parser.cxx

@@ -9620 +9620 @@
         SyntaxParser::parse_requirements_line (temp, current_use);
       }
+
+    for (int i = 0; i < constituents.size (); i++)
+      {
+        const Constituent& constituent = constituents[i];
+        if (constituent.type == Document) continue;
+        const cmt_string macro_name = constituent.name + "compile_dependencies";
+        if (!Symbol::is_selected (macro_name))
+          {
+            temp = "macro_append ";
+            temp += macro_name;
+            temp += " \"";
+
+            const Symbol* deps_macro = Symbol::find (constituent.name + "_dependencies");
+            if (deps_macro != 0)
+              {
+                const cmt_string deps_value (deps_macro->resolve_macro_value ());
+                CmtSystem::cmt_string_vector words;
+                CmtSystem::split (deps_value, " \t", words);
+                for (int i = 0; i < words.size (); i++)
+                  {
+                    const cmt_string& word = words[i];
+                    const Constituent* dep = Constituent::find (word);
+                    if (dep == 0)
+                      {
+                        if (CmtMessage::active (Verbose))
+                          CmtMessage::warning
+                            (CmtError::get_error_name (CmtError::configuration_error)
+                             + ": " + word + ": non-constituent name in macro "
+                             + constituent.name + "_dependencies value");
+                        continue;
+                      }
+                    switch (dep->type)
+                      {
+                      case Application:
+                      case Library:
+                        if (dep->need_prototypes)
+                          temp += " " + word + "prototype";
+                        break;
+                      case Document:
+                        temp += " " + word;
+                        break;
+                      }
+                  }
+              }
+
+            temp += "\"";
+            
+            SyntaxParser::parse_requirements_line (temp, current_use);
+          }
+        if (constituent.need_prototypes)
+          {
+            const cmt_string macro_name = constituent.name + "prototype_dependencies";
+            if (!Symbol::is_selected (macro_name))
+              {
+                temp = "macro_append ";
+                temp += macro_name;
+                temp += " \" $(";
+                temp += constituent.name + "compile_dependencies)\"";
+            
+                SyntaxParser::parse_requirements_line (temp, current_use);
+              }
+          }
+      }
   }