package constant::Atom::Strict;
use 5.006;
use strict;
use warnings;
our $VERSION = '0.07';
use Carp;
use base 'constant::Atom';
sub tostring {
my($self) = @_;
my $class = ref($self);
croak "Can't cast $class object '".$$self."' into a string. Use the 'fullname' method for a string representation of this object";
}
1;