Lines Matching refs:class
24 # per class. The hash is indexed by class names and the hash value is
26 # number not belonging to a base class. The remaining elements' indices
28 # in the case of base class private fields (which occupy a slot but are
29 # otherwise irrelevant to the class).
32 my $class = shift;
60 warn("Hides field '$f' in base class") if $^W;
62 warnings::warnif("Hides field '$f' in base class") ;
115 my $class = shift;
116 $class = ref $class if ref $class;
117 return bless [\%{$class . "::FIELDS"}], $class;
121 my $class = shift;
122 $class = ref $class if ref $class;
124 my $self = bless {}, $class;
127 &Hash::Util::lock_keys(\%$self, keys %{$class.'::FIELDS'});
173 fields - compile-time class fields
204 my $class = shift;
205 my $self = fields::new($class);
215 The C<fields> pragma enables compile-time verified class fields.
226 declared class fields using this pragma, then the operation is
235 the class and are not visible to subclasses. Inherited fields can be
256 pragma into the specified class.
260 pragma into the specified class.