diff options
author | jonesc <jonesc@a3e5c962-4219-0410-a828-e124f845ac39> | 2012-01-17 05:24:59 +0000 |
---|---|---|
committer | jonesc <jonesc@a3e5c962-4219-0410-a828-e124f845ac39> | 2012-01-17 05:24:59 +0000 |
commit | 5b077cd62c68fd3be08bc888d4ad2568d87e375e (patch) | |
tree | 64c4f08f54233e3f22376c893a38fa411e9c1f85 /modules/Creator.pm | |
parent | 66a603f159951e2600813df7f2be31744d5c6047 (diff) | |
download | MPC-5b077cd62c68fd3be08bc888d4ad2568d87e375e.tar.gz |
Mon Jan 16 22:01:41 UTC 2012 Chip Jones <jonesc@ociweb.com>
* modules/Creator.pm:
Modifications to support multiprocess MPC.
* modules/Depgen/DependencyEditor.pm:
* modules/Depgen/Driver.pm:
Modified dependency generator to support appending to existing
files and generating dependencies for IDL files.
* modules/Driver.pm:
* modules/Options.pm:
* modules/Parser.pm:
* modules/ProjectCreator.pm:
* modules/TemplateParser.pm:
* modules/WorkspaceCreator.pm:
Modified MPC to generate projects in separate processes.
This experimental feature is enabled with the
command-line option '-workers.' It's behavior can
be modified with the '-workers_dir' and '-workers_port'
directives.
This is a merge of work done in the 'mpc_performance' branch.
Diffstat (limited to 'modules/Creator.pm')
-rw-r--r-- | modules/Creator.pm | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/modules/Creator.pm b/modules/Creator.pm index 5c2f2ab6..af024214 100644 --- a/modules/Creator.pm +++ b/modules/Creator.pm @@ -66,7 +66,14 @@ my $onVMS = DirectoryManager::onVMS(); # ************************************************************ sub new { - my($class, $global, $inc, $template, $ti, $dynamic, $static, $relative, $addtemp, $addproj, $progress, $toplevel, $baseprojs, $feature, $features, $hierarchy, $nmodifier, $applypj, $into, $language, $use_env, $expandvars, $type) = @_; + my($class, $global, $inc, $template, + $ti, $dynamic, $static, $relative, + $addtemp, $addproj, $progress, + $toplevel, $baseprojs, $feature, + $features, $hierarchy, $nmodifier, + $applypj, $into, $language, $use_env, + $expandvars, $type) = @_; + my $self = Parser::new($class, $inc); $self->{'relative'} = $relative; @@ -105,7 +112,6 @@ sub new { return $self; } - sub preprocess_line { my($self, $fh, $line) = @_; @@ -195,7 +201,6 @@ sub generate { return $status; } - # split an inheritance list like ": a,b, c" into components sub parse_parents { my($parents, $errorStringRef, $statusRef) = @_; |