From: gfx Date: Sat, 15 Aug 2009 11:04:41 +0000 (+0900) Subject: Fix ArrayBasedStorage to define is_inlinable{ 1 } X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=901a680d4213c3274be0c2e0bc255296a17a7ebd;p=gitmo%2FClass-MOP.git Fix ArrayBasedStorage to define is_inlinable{ 1 } --- diff --git a/examples/ArrayBasedStorage.pod b/examples/ArrayBasedStorage.pod index 5c0369c..e427227 100644 --- a/examples/ArrayBasedStorage.pod +++ b/examples/ArrayBasedStorage.pod @@ -33,6 +33,8 @@ sub clone_instance { $self->bless_instance_structure([ @$instance ]); } +sub is_inlinable{ 0 } + # operations on meta instance sub get_slot_index_map { (shift)->{'slot_index_map'} }