From 93da2e96d5242bfb84047043fb93168374eaf9fd Mon Sep 17 00:00:00 2001 From: =?utf8?q?J=C3=A9r=C3=B4me=20Quelin?= Date: Sat, 17 Jan 2009 13:16:14 +0100 Subject: [PATCH] moved to class::xsaccessor --- lib/Language/Befunge/Storage/2D/Sparse.pm | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/lib/Language/Befunge/Storage/2D/Sparse.pm b/lib/Language/Befunge/Storage/2D/Sparse.pm index b68a0da..6ec3bad 100644 --- a/lib/Language/Befunge/Storage/2D/Sparse.pm +++ b/lib/Language/Befunge/Storage/2D/Sparse.pm @@ -16,8 +16,16 @@ use Carp; use aliased 'Language::Befunge::Vector' => 'LBV'; use Readonly; -use base qw{ Class::Accessor::Fast Language::Befunge::Storage }; -__PACKAGE__->mk_accessors( qw{ _storage _xmin _xmax _ymin _ymax } ); +use base qw{ Language::Befunge::Storage }; + +use Class::XSAccessor + accessors => { + _storage => '_storage', + _xmin => '_xmin', + _xmax => '_xmax', + _ymin => '_ymin', + _ymax => '_ymax', + }; Readonly my $SPACE => ' '; -- 2.11.4.GIT