Idris-dev/test/reg061/Capture.idr
David Raymond Christiansen 8fce3b9cc0 Avoid test clash with upstream
2015-03-22 10:49:17 +01:00

10 lines
177 B
Idris

module Capture
-- Test for variable capture in syntax
syntax delay [x] = \z => case z of { () => x }
syntax delay' [z] = delay z
capture : a -> () -> a
capture x = delay' x