summaryrefslogtreecommitdiff
path: root/lib/sbin/create_c_stuff.pl
diff options
context:
space:
mode:
authorallen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac>1999-03-02 16:29:30 +0000
committerallen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac>1999-03-02 16:29:30 +0000
commitc112c26f680728feab220393c7c502f759cc72df (patch)
treebf439205a6826d9747ef685e200968867153390f /lib/sbin/create_c_stuff.pl
parenta57af17b9b91c27fe2d7c4e31760630f23cec7cf (diff)
Removed some speech marks which seem to be surplus to requirements ...
Gab git-svn-id: http://svn.cactuscode.org/flesh/trunk@373 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/sbin/create_c_stuff.pl')
-rw-r--r--lib/sbin/create_c_stuff.pl7
1 files changed, 5 insertions, 2 deletions
diff --git a/lib/sbin/create_c_stuff.pl b/lib/sbin/create_c_stuff.pl
index e4ad29c4..af68a0da 100644
--- a/lib/sbin/create_c_stuff.pl
+++ b/lib/sbin/create_c_stuff.pl
@@ -207,7 +207,10 @@ sub set_parameter_code
{
$quoted_range = $parameter_database{"\U$implementation $parameter\E range $range range"};
- $quoted_range =~ s:\":\\\":g;
+ #$quoted_range =~ s:\":\\\":g;
+ $quoted_range =~ s:\"::g;
+ $quoted_range =~ s:^\s*::;
+ $quoted_range =~ s:\s*$::;
$line .= ",\"".$quoted_range."\"";
@@ -456,7 +459,7 @@ sub order_params
push(@string_params, $parameter);
}
elsif($type eq "LOGICAL" ||
- $type eq "INTEGER")
+ $type eq "INTEGER")
{
push(@int_params, $parameter);
}