Introspection of .returns/.of on Routine.

rakudo · Jul 9, 2011 · 1fa3334 · 1fa3334
1 parent 6b6bc4e
commit 1fa3334
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 0 deletions.
diff --git a/src/core/Routine.pm b/src/core/Routine.pm
@@ -1,2 +1,4 @@
 my class Routine {
+    method of() { self.signature.returns }
+    method returns() { self.signature.returns }
 }
diff --git a/src/core/Signature.pm b/src/core/Signature.pm
@@ -54,4 +54,6 @@ my class Signature {
         # Closer.
         $perl ~ ')'
     }
+
+    method returns() { $!returns }
 }