mercury_amqp 0.1.3 → 0.1.4

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: ecf7917c63df98ddac8e56561aab982fc16592d9
-  data.tar.gz: e59c232c4f97ac0f44fab2579cb3887b25f717da
+  metadata.gz: 046bcdd150e6875d732e623389624a2d26abb08c
+  data.tar.gz: 1d5bc9696f0bd8ee418ba99c3326c4c6cfb5fa2d
 SHA512:
-  metadata.gz: 2d4830869b364b0b31da8875701d927a3eb03c54274bcaeadd778a5f2f93ca597e6a70751d0ddd89a013d1df2e1728f544674236288e288f67425e2028af17a2
-  data.tar.gz: 84d5e36eff96f6430d62148e3007569c50fd3d7a489f630d86f31bbee7711463a0512e6684698b32d2bb3f527b60a643184dae9b1979f697872f3b648d16e95f
+  metadata.gz: 98d86ee54503071de7bec6037b6539f6931e15fef44428ad85ba6ed32ed7e38ab9a735973c3e039b6268b4dec39caaf13cb764b408c0b41988c045eb690d1cb9
+  data.tar.gz: 9bbe848304af07e201adbeadbe0452826694a0b89e862d4958461069c284584c00b15408a12682b068edf7386b39e56708f9c56b38611e961b4f09e6b5ed1747

data/lib/mercury/test_utils.rb

@@ -4,6 +4,8 @@ require 'mercury/monadic'
 
 class Mercury
   module TestUtils
+    include Cps::Methods
+
     def em
       EM.run do
         EM.add_timer(in_debug_mode? ? 999999 : 3) { raise 'EM spec timed out' }
@@ -52,6 +54,34 @@ class Mercury
       end
     end
 
+    def read_all_messages(worker: , source:, tag:, seconds_to_wait: 0.1)
+      msgs = []
+      last_received_time = Time.now
+      msg_handler = ->(msg) do
+        msgs << msg
+        msg.ack
+        last_received_time = Time.now
+      end
+      EM.run do
+        Cps.seql do
+          let(:m) { Mercury::Monadic.open }
+          and_then { m.start_worker(worker, source, msg_handler, tag_filter: tag) }
+          and_then { wait_until { (Time.now - last_received_time).to_f > seconds_to_wait } }
+          and_then { m.close }
+          and_lift { EM.stop }
+        end.run
+      end
+      msgs
+    end
+
+    def cps_benchmark(label, &block)
+      seql do
+        let(:time) { lift { Time.now } }
+        and_then { block.call }
+        and_lift { puts "#{label} : #{(Time.now - time) * 1000} ms" }
+      end
+    end
+
     def amq_filter(xs)
       xs.reject{|x| x.start_with?('amq.')}
     end

data/lib/mercury/version.rb

@@ -1,3 +1,3 @@
 class Mercury
-  VERSION = '0.1.3'
+  VERSION = '0.1.4'
 end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: mercury_amqp
 version: !ruby/object:Gem::Version
-  version: 0.1.3
+  version: 0.1.4
 platform: ruby
 authors:
 - Peter Winton
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2015-11-23 00:00:00.000000000 Z
+date: 2015-12-17 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: bundler