1package autoclass_011::Inconsistent1;
2use strict;
3use Class::AutoClass;
4use vars
5  qw(@ISA @AUTO_ATTRIBUTES @OTHER_ATTRIBUTES @CLASS_ATTRIBUTES %SYNONYMS %DEFAULTS);
6@ISA              = qw(Class::AutoClass);
7@AUTO_ATTRIBUTES  = qw(a);
8@OTHER_ATTRIBUTES = qw();
9@CLASS_ATTRIBUTES = qw(b);
10%SYNONYMS         = ( );
11%DEFAULTS = ();
12Class::AutoClass::declare(__PACKAGE__);
13
14sub _init_self {
15 my ( $self, $class, $args ) = @_;
16 return
17   unless $class eq __PACKAGE__;    # to prevent subclasses from re-running this
18
19}
201;
21