Author: jkeenan Date: Thu Jan 22 19:48:03 2009 New Revision: 35904 Modified: trunk/src/ops/pmc.ops trunk/t/pmc/class.t
Log: Applying patches submitted by Ron Schmidt in http://rt.perl.org/rt3/Ticket/Display.html?id=62634 (POD change in src/ops/pmc.ops and http://rt.perl.org/rt3/Ticket/Display.html?id=62588 (activate some tests in t/pmc/class.t). Modified: trunk/src/ops/pmc.ops ============================================================================== --- trunk/src/ops/pmc.ops (original) +++ trunk/src/ops/pmc.ops Thu Jan 22 19:48:03 2009 @@ -48,7 +48,7 @@ new P0, 'ResizableBooleanArray' Optionally a PMC may be passed to the constructor. It's up to the class what -to do with the intializer. See PDD02 for more. +to do with the initializer. See PDD17 and the init_pmc function for more. =cut Modified: trunk/t/pmc/class.t ============================================================================== --- trunk/t/pmc/class.t (original) +++ trunk/t/pmc/class.t Thu Jan 22 19:48:03 2009 @@ -17,7 +17,7 @@ =cut -.const int TESTS = 49 +.const int TESTS = 53 .sub 'main' :main @@ -38,7 +38,7 @@ # 'add_method'() # TODO not yet implemented 'parents'() 'roles'() -# 'inspect'() # XXX must fix 'attributes' test + 'inspect'() 'clone'() 'clone_pmc'() 'new with init hash'() @@ -332,7 +332,7 @@ ok(1, 'inspect() with no args called returns successfully') test_val = elements result - is(test_val, 6, 'inspect() returns correctly sized value') + is(test_val, 7, 'inspect() returns correctly sized value') result = class.'inspect'('name') is(result, 'foo', 'inspect() "name" param returns expected value')