adjust precedence of (:-)
so `skip $ "grp" :- [...]` works
This commit is contained in:
parent
809a0fc859
commit
12753eb894
1 changed files with 1 additions and 1 deletions
|
@ -101,7 +101,7 @@ testThrows label p act = One $ MakeTest label $ do
|
|||
Left err => if p err then success () else failure err
|
||||
Right val => failure [("success", val)]
|
||||
|
||||
infix 0 :-
|
||||
infix 1 :-
|
||||
export %inline
|
||||
(:-) : String -> List Test -> Test
|
||||
(:-) = Group
|
||||
|
|
Loading…
Reference in a new issue