sysdeftools/joinsysdef.pl
branchHighFidelityModel
changeset 276 d9662ec4599f
parent 259 fbf606da2044
child 413 9bcf6c827202
--- a/sysdeftools/joinsysdef.pl	Tue Jun 01 16:18:31 2010 +0100
+++ b/sysdeftools/joinsysdef.pl	Wed Jun 02 12:12:18 2010 +0100
@@ -30,7 +30,7 @@
 
 my $output;
 my $path;
-my $config;
+my @config;
 my @includes;
 my %defineParams;
 my %defines;
@@ -58,7 +58,7 @@
 	(
 	 'path=s' => \$path,
 	'output=s' => \$output,
-	'config=s' => \$config,
+	'config=s' => \@config,
 	'exclude-meta=s' => \@excludeMetaList
 	);
 
@@ -96,9 +96,9 @@
 my %nsmap;
 my %urimap;
 
-if($config ne '') 
+foreach my $conf (@config) 
 	{ # run cpp to get all #defines
-	&getDefines($config);
+	&getDefines($conf);
 	}
 
 my $parser = new XML::DOM::Parser;
@@ -340,7 +340,7 @@
 		$checkversion = $checkversion  || ($tag eq 'component' &&  $item->getNodeType==1 && $item->getAttribute('version') ne '');
 		}
 
-	if($checkversion && $config ne '')
+	if($checkversion && scalar(@config))
 		{ # need to check the conf metadata on the units in this component
 		&doCmpConfig($node);
 		}
@@ -647,7 +647,7 @@
 	my $metanode = shift;
 
 	my $rel = $metanode->getAttribute('rel') || 'Generic';
-	if($rel eq 'config' && $config ne '')
+	if($rel eq 'config' && scalar(@config))
 		{ # only process if there is something to configure
 		&doconfig($metanode);
 		}