From d82263df799a28b9649ef4b852af105d5021b2e4 Mon Sep 17 00:00:00 2001
From: schnetter <schnetter@17b73243-c579-4c4c-a9d2-2d5706c11dac>
Date: Fri, 25 Jan 2008 14:49:20 +0000
Subject: When parsing parameters, require that no other text comes before the
 EXTENDS or USES keywords.

git-svn-id: http://svn.cactuscode.org/flesh/trunk@4448 17b73243-c579-4c4c-a9d2-2d5706c11dac
---
 lib/sbin/parameter_parser.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/sbin/parameter_parser.pl b/lib/sbin/parameter_parser.pl
index 4b27db4c..d7018a5c 100644
--- a/lib/sbin/parameter_parser.pl
+++ b/lib/sbin/parameter_parser.pl
@@ -148,7 +148,7 @@ sub parse_param_ccl
       $parameter_db{"\U$thorn $block\E variables"} = ''
         if(! $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+\"[^\"]*\")?\s*(.*)$:i)
+    elsif($line =~ m:^(EXTENDS |USES )?\s*(?\:CCTK_)?(INT|REAL|BOOLEAN|KEYWORD|STRING)\s+([a-zA-Z]+[a-zA-Z0-9_]*)(\s*\[([^]]+)\])?(\s+\"[^\"]*\")?\s*(.*)$:i)
     {
       # This is a parameter definition.
 
-- 
cgit v1.2.3