X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=examples%2FArrayBasedStorage.pod;h=bff9baaec231d2ea62041ea11e578135ca0c5e28;hb=4717d7fa6f9e242d650a086f4ee6ab5ce5d56824;hp=43b459d8a0465df0b1b21423c385e61b6aa7a5bf;hpb=1fdb86fb486a14a2cb3a85bc618365ca98d75a4a;p=gitmo%2FClass-MOP.git diff --git a/examples/ArrayBasedStorage.pod b/examples/ArrayBasedStorage.pod index 43b459d..bff9baa 100644 --- a/examples/ArrayBasedStorage.pod +++ b/examples/ArrayBasedStorage.pod @@ -72,6 +72,8 @@ sub is_slot_initialized { refaddr $value eq refaddr $unbound ? 0 : 1; } +sub is_dependent_on_superclasses { 1 } + 1; __END__