expose sub signatures of a Parameter

rakudo · Jul 20, 2012 · b15d33b · b15d33b
1 parent 4eeffca
commit b15d33b
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/core/Parameter.pm b/src/core/Parameter.pm
@@ -177,4 +177,8 @@ my class Parameter {
         }
         $perl
     }
+
+    method sub_signature(Parameter:D:) {
+        nqp::isnull($!sub_signature) ?? Any !! $!sub_signature
+    }
 }