Temporary fix to get .signature to work on ObjectRefs (fixes RT #63744).

The correct fix will likely be to have method dispatch dereference objects prior to dispatch.
rakudo · Mar 9, 2009 · d16d3c3 · d16d3c3
1 parent 065175b
commit d16d3c3
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/classes/Code.pir b/src/classes/Code.pir
@@ -155,12 +155,12 @@ Gets the signature for the block, or returns Failure if it lacks one.
 =cut
 
 .sub 'signature' :method
-    $P0 = getprop '$!signature', self
+    $P0 = '!DEREF'(self)
+    $P0 = getprop '$!signature', $P0
     if null $P0 goto no_sig
     .return ($P0)
   no_sig:
-    $P0 = get_hll_global 'Failure'
-    .return ($P0)
+    .tailcall '!FAIL'('No signature found')
 .end