diff options
| author | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-10-24 22:55:51 +0000 |
|---|---|---|
| committer | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-10-24 22:55:51 +0000 |
| commit | 9bf28bf5ac1cb628ed935d4498694a7482b32de0 (patch) | |
| tree | 22276e1a378652895917eada7c89dce2c1144319 /lib/sbin/ParamLatex.pl | |
| parent | 3b0a0ea158df599e3fd87ab5100bf8e4344b322b (diff) | |
Changed to use Perl5 stuff...
local -> my
used perl 5 references for passing databases around in the CST.
CST is now about a factor of 16 faster !
Tom
git-svn-id: http://svn.cactuscode.org/flesh/trunk@1101 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/sbin/ParamLatex.pl')
| -rw-r--r-- | lib/sbin/ParamLatex.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/sbin/ParamLatex.pl b/lib/sbin/ParamLatex.pl index e5db6241..e9a3ae16 100644 --- a/lib/sbin/ParamLatex.pl +++ b/lib/sbin/ParamLatex.pl @@ -26,8 +26,8 @@ $thorn{"WaveToy"} = "arrangements/CactusApplications/WaveToy"; #@@*/ sub latex_database { - local(%parameter_database) = @_; - local($field); + my(%parameter_database) = @_; + my($field); $nvars = 0; |