{"body":"      {\n          class TestOnDemandSupply does Tappable {\n              method tap(&emit, &, &, &tap) {\n                  my $t = $*SCHEDULER.cue({.&emit for ^4});\n                  tap($t);\n                  $t\n              }\n              method sane\\      (--> True)  {}\n              method serial\\    (--> False) {}\n              method live\\      (--> False) {}\n          }\n          subtest {\n              react {\n                  whenever Promise.in(10) {\n                      flunk \"zip timed out\";\n                      done;\n                  }\n                  whenever Supply.zip: Supply.from-list(^2), Supply.new(TestOnDemandSupply.new) -> $l {\n                      .say;\n                      if $l eqv ((0, 0) | (1, 1)) {\n                          pass \"zip is ok\"\n                      } else {\n                          flunk \"invalid value: $l\"\n                      }\n                      LAST { done }\n                  }\n              }\n          }\n      }\n","name":"","extension":"txt","url":"https://www.irccloud.com/pastebin/02Zcq1m7","modified":1511629045,"id":"02Zcq1m7","size":987,"lines":29,"own_paste":false,"theme":"","date":1511629045}