fix yaml doc indent
This commit is contained in:
parent
d74b056e11
commit
d062f79176
1 changed files with 5 additions and 5 deletions
|
@ -117,12 +117,12 @@ run1' : (Nat, TestBase) -> Runner Bool
|
||||||
run1' (index, test) = do
|
run1' (index, test) = do
|
||||||
res <- liftIO test.run
|
res <- liftIO test.run
|
||||||
case res of
|
case res of
|
||||||
Tried ok info => putIndentLines $
|
Tried ok info => do
|
||||||
"\{isOk ok} \{show index} - \{test.label}" ::
|
putIndentLines ["\{isOk ok} \{show index} - \{test.label}"]
|
||||||
toLines info
|
local (plus 2) $ putIndentLines $ toLines info
|
||||||
Skip reason => putIndentLines $
|
Skip reason => putIndentLines
|
||||||
["ok \{show index} - \{test.label} # skip \{reason}"]
|
["ok \{show index} - \{test.label} # skip \{reason}"]
|
||||||
Todo reason => putIndentLines $
|
Todo reason => putIndentLines
|
||||||
["ok \{show index} - \{test.label} # todo \{reason}"]
|
["ok \{show index} - \{test.label} # todo \{reason}"]
|
||||||
pure $ toBool res
|
pure $ toBool res
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue