src/assert.hs · streamly

git.iko.soy/streamly

on master help sign in

streamly/src/assert.hs

6 lines 291 B history raw

1-- A convenient macro to assert in a do block. We cannot define this as a

2-- Haskell function because then the compiler reports the assert location

3-- inside the wrapper function rather than the original location.

5import Control.Exception (assert)

6#define assertM(p) assert (p) (return ())