# Preloaded methods go here.
sub XYZ::ABC::Scalar::TIESCALAR {
	my $class = shift;
	my ($val) = @_;
	return bless \$val, $class;
}

##</code><code>##

sub XYZ::ABC::Array::STORE {
    my $self = shift;
    abc_array_store ($self->{ARRAY}, @_);
}