diff options
Diffstat (limited to 'stdlib/test')
| -rw-r--r-- | stdlib/test/test/lux/concurrency/frp.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/test/test/lux/concurrency/frp.lux b/stdlib/test/test/lux/concurrency/frp.lux index 057f155d0..717eb0624 100644 --- a/stdlib/test/test/lux/concurrency/frp.lux +++ b/stdlib/test/test/lux/concurrency/frp.lux @@ -10,7 +10,7 @@ (def: (to-channel values) (-> (List Int) (&.Channel Int)) - (let [_channel (&.channel Int)] + (let [_channel (: (&.Channel Int) (&.channel))] (io.run (do io.Monad<IO> [_ (M.map @ (function [value] (&.write value _channel)) values) @@ -31,7 +31,7 @@ (wrap (do P.Monad<Promise> [elems (&.consume (let [input (to-channel (list 0 1 2 3 4 5)) - output (&.channel Int)] + output (: (&.Channel Int) (&.channel))] (exec (&.pipe input output) output)))] (assert "Can pipe one channel into another." |