diff --git a/src/cheats/parrot/Protoobject.pir b/src/cheats/parrot/Protoobject.pir index 612db235782..a839c89a654 100644 --- a/src/cheats/parrot/Protoobject.pir +++ b/src/cheats/parrot/Protoobject.pir @@ -108,18 +108,12 @@ Return a clone of the protoobject with a new WHENCE property set. .namespace ['P6protoobject'] .sub '' :vtable('get_integer') :method - .const 'Sub' $P1 = '!FAIL' - $P0 = $P1('Use of type object as value in integer context') - $I0 = $P0 - .return ($I0) + .return (0) .end .namespace ['P6protoobject'] .sub '' :vtable('get_number') :method - .const 'Sub' $P1 = '!FAIL' - $P0 = $P1('Use of type object as value in numeric context') - $N0 = $P0 - .return ($N0) + .return (0.0) .end # Local Variables: