Add Actress::AdHoc actor

it's behavior is given by proc passed on initialization

Author: pitr-ch

lib/concurrent/actress.rb

@@ -26,6 +26,8 @@ module Actress
     require 'concurrent/actress/core'
     require 'concurrent/actress/context'
 
+    require 'concurrent/actress/ad_hoc'
+
     # @return [Reference, nil] current executing actor if any
     def self.current
       Thread.current[:__current_actress__]

lib/concurrent/actress/ad_hoc.rb

@@ -0,0 +1,14 @@
+module Concurrent
+  module Actress
+    class AdHoc
+      include Context
+      def initialize(&initializer)
+        @on_message = Type! initializer.call, Proc
+      end
+
+      def on_message(message)
+        @on_message.call message
+      end
+    end
+  end
+end

spec/actress.rb

@@ -16,7 +16,7 @@ def on_message(message)
     when :terminate
       terminate!
     when :child
-      Ping.spawn :pong, @queue
+      Concurrent::Actress::AdHoc.spawn(:pong) { -> m { @queue << m } }
     else
       @queue << message
       message
@@ -43,7 +43,6 @@ def assert condition
 end
 
 
-
 Array.new(100).map do
   Thread.new do
     20.times do |i|