Subject: | SQL comment for Oracle added |
SQL::Translator 0.02, SQL-Fairy
perl 5.8.0 mswin
To allow for comments of style
CREATE TABLE_NAME (
ATTRIBUTE_NAME TABLE_TYPE META /* here ist the comment */,
in addition to the working "--"-comments,
I changed SQL/Translator/Parser/Oracle.pm from:
comment : /^\s*(?:#|-{2}).*\n/
to:
comment : comment : /^\s*(?:#|-{2}).*\n/
| /\/\*/ /[^\*]+/ /\*\//
{
my $val = $item[2];
chop($val);
$return = $val;
}
and in SQL/Producer/XML.pm in sub produce
from:
name data_type default_value is_auto_increment
to:
name data_type comments default_value is_auto_increment
best regards
alex
--
Alexander Sigel, M.A.
-- Wissensmanager / Fachberater KM --
teckpro AG (www.teckpro.de)
Niederlassung Köln:
Odenwaldstr. 72, 51105 Köln (-Humboldt-Gremberg)
Tel./Fax: 0221/8025543, Mobil 0178/3504515
a.sigel@teckpro.de
--