Add Callable role; make Code do it.

rakudo · Jun 26, 2011 · ec37e1b · ec37e1b
1 parent 9cc88cc
commit ec37e1b
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 1 deletion.
diff --git a/src/core/Callable.pm b/src/core/Callable.pm
@@ -0,0 +1,2 @@
+my role Callable {
+}
diff --git a/src/core/Code.pm b/src/core/Code.pm
@@ -1,4 +1,4 @@
-my class Code {
+my class Code does Callable {
     multi method ACCEPTS(Code:D $self: $topic) {
         $self.count ?? $self($topic) !! $self()
     }

diff --git a/tools/build/Makefile.in b/tools/build/Makefile.in
@@ -122,6 +122,7 @@ CORE_SOURCES = \
   src/core/control.pm \
   src/core/Positional.pm \
   src/core/Associative.pm \
+  src/core/Callable.pm \
   src/core/Mu.pm \
   src/core/Any.pm \
   src/core/Code.pm \