package Rose::DB::Object::Metadata::Column::Bitfield; use strict; use Rose::Object::MakeMethods::Generic; use Rose::DB::Object::MakeMethods::Generic; use Rose::DB::Object::Metadata::Column; our @ISA = qw(Rose::DB::Object::Metadata::Column); our $VERSION = '0.01'; __PACKAGE__->add_method_maker_argument_names ( qw(default bits) ); Rose::Object::MakeMethods::Generic->make_methods ( { preserve_existing => 1 }, scalar => [ __PACKAGE__->method_maker_argument_names ] ); sub type { 'bitfield' } sub method_maker_class { 'Rose::DB::Object::MakeMethods::Generic' } sub method_maker_type { 'bitfield' } 1; __END__ =head1 NAME Rose::DB::Object::Metadata::Column::Bitfield - Bitfield column metadata. =head1 SYNOPSIS use Rose::DB::Object::Metadata::Column::Bitfield; $col = Rose::DB::Object::Metadata::Column::Bitfield->new(...); $col->make_method(...); ... =head1 DESCRIPTION Objects of this class store and manipulate metadata for bitfield columns in a database. Column metadata objects store information about columns (data type, size, etc.) and are responsible for creating object methods that manipulate column values. This class inherits from C. Inherited methods that are not overridden will not be documented a second time here. See the C documentation for more information. =head1 OBJECT METHODS =over 4 =item B Get or set the default value of the column. =item B Get or set the number of bits in the column. =item B Returns C. =item B Returns C. =item B Returns "bitfield". =back =head1 AUTHOR John C. Siracusa (siracusa@mindspring.com) =head1 COPYRIGHT Copyright (c) 2005 by John C. Siracusa. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.