From: Ross Smith II Date: Sun, 17 Aug 2003 07:44:06 +0000 (+0000) Subject: Added FIXED as DEC per http://www.mysql.com/doc/en/Column_types.html X-Git-Tag: v0.04~312 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9304bd8e0a9e14206ede4b508363c9738c45a7d2;p=dbsrgits%2FSQL-Translator.git Added FIXED as DEC per mysql.com/doc/en/Column_types.html --- diff --git a/lib/SQL/Translator/Parser/MySQL.pm b/lib/SQL/Translator/Parser/MySQL.pm index c65424a..01c95da 100644 --- a/lib/SQL/Translator/Parser/MySQL.pm +++ b/lib/SQL/Translator/Parser/MySQL.pm @@ -1,7 +1,7 @@ package SQL::Translator::Parser::MySQL; # ------------------------------------------------------------------- -# $Id: MySQL.pm,v 1.31 2003-08-16 20:10:39 rossta Exp $ +# $Id: MySQL.pm,v 1.32 2003-08-17 07:44:06 rossta Exp $ # ------------------------------------------------------------------- # Copyright (C) 2003 Ken Y. Clark , # darren chamberlain , @@ -123,7 +123,7 @@ Here's the word from the MySQL site use strict; use vars qw[ $DEBUG $VERSION $GRAMMAR @EXPORT_OK ]; -$VERSION = sprintf "%d.%02d", q$Revision: 1.31 $ =~ /(\d+)\.(\d+)/; +$VERSION = sprintf "%d.%02d", q$Revision: 1.32 $ =~ /(\d+)\.(\d+)/; $DEBUG = 0 unless defined $DEBUG; use Data::Dumper; @@ -385,7 +385,7 @@ data_type : WORD parens_value_list(s?) type_qualifier(s?) elsif ( lc $type eq 'bigint' ) { $size = [20]; } - elsif ( lc $type =~ /(float|double|decimal|numeric|real)/ ) { + elsif ( lc $type =~ /(float|double|decimal|numeric|real|fixed|dec)/ ) { $size = [8,2]; } }