diff options
author | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2001-03-17 09:24:37 +0000 |
---|---|---|
committer | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2001-03-17 09:24:37 +0000 |
commit | 352fb8b905eadacb205f2a7d53168606c697fd59 (patch) | |
tree | 741fa90b22dfe8405a4f11ee87057fbd9097d713 /lib/sbin/parameter_parser.pl | |
parent | 91921e6214fc07d2a362c973a924c4aee1134902 (diff) |
Making sure there is at least one space between parameter type and name.
Tom
git-svn-id: http://svn.cactuscode.org/flesh/trunk@2082 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/sbin/parameter_parser.pl')
-rw-r--r-- | lib/sbin/parameter_parser.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/sbin/parameter_parser.pl b/lib/sbin/parameter_parser.pl index e9bb8040..03e79f40 100644 --- a/lib/sbin/parameter_parser.pl +++ b/lib/sbin/parameter_parser.pl @@ -145,7 +145,7 @@ sub parse_param_ccl $parameter_db{"\U$thorn $block\E variables"} = ""; } } - elsif($line =~ m:(EXTENDS |USES )?\s*(?\:CCTK_)?(INT|REAL|BOOLEAN|KEYWORD|STRING)\s*([a-zA-Z]+[a-zA-Z0-9_]*)\s*(\"[^\"]*\")?\s*(.*)$:i) + elsif($line =~ m:(EXTENDS |USES )?\s*(?\:CCTK_)?(INT|REAL|BOOLEAN|KEYWORD|STRING)\s+([a-zA-Z]+[a-zA-Z0-9_]*)\s+(\"[^\"]*\")?\s*(.*)$:i) { # This is a parameter definition. |