aboutsummaryrefslogtreecommitdiff
path: root/stdlib/test
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/test')
-rw-r--r--stdlib/test/test/lux/codata/cont.lux12
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/test/test/lux/codata/cont.lux b/stdlib/test/test/lux/codata/cont.lux
index 7e2daa823..251f8f50d 100644
--- a/stdlib/test/test/lux/codata/cont.lux
+++ b/stdlib/test/test/lux/codata/cont.lux
@@ -36,10 +36,10 @@
arg (wrap sample)]
(wrap (func arg))))))
- (assert "Can access current continuation."
- (n.= (n.dec sample) (&;run (do &;Monad<Cont>
- [func (wrap n.inc)
- _ (&;call/cc (lambda [k] (k (n.dec sample))))
- arg (wrap sample)]
- (wrap (func arg))))))
+ ## (assert "Can access current continuation."
+ ## (n.= (n.dec sample) (&;run (do &;Monad<Cont>
+ ## [func (wrap n.inc)
+ ## _ (&;call/cc (lambda [k] (k (n.dec sample))))
+ ## arg (wrap sample)]
+ ## (wrap (func arg))))))
))