6 use SQL::Translator::Generator::DDL::SQLServer;
7 use SQL::Translator::Schema::Field;
9 my $shim = SQL::Translator::Generator::DDL::SQLServer->new();
11 is $shim->field(SQL::Translator::Schema::Field->new(
14 )), '[lol] int NULL', 'simple field is generated correctly';
16 is $shim->field(SQL::Translator::Schema::Field->new(
18 data_type => 'varchar',
20 )), '[nice] varchar(10) NULL', 'sized field is generated correctly';