change V13 name separator
This commit is contained in:
parent
17399cafd9
commit
aba132b542
1 changed files with 1 additions and 1 deletions
2
TAP.idr
2
TAP.idr
|
@ -178,7 +178,7 @@ header tests =
|
||||||
private
|
private
|
||||||
withPrefix : SnocList String -> TestBase -> Test
|
withPrefix : SnocList String -> TestBase -> Test
|
||||||
withPrefix pfx = One . {label $= (makePrefix pfx ++)}
|
withPrefix pfx = One . {label $= (makePrefix pfx ++)}
|
||||||
where makePrefix = concatMap $ \s => "\{s} ⟫ "
|
where makePrefix = concatMap $ \s => "\{s} » "
|
||||||
|
|
||||||
mutual
|
mutual
|
||||||
||| flatten some tests, starting with the prefix given
|
||| flatten some tests, starting with the prefix given
|
||||||
|
|
Loading…
Reference in a new issue