Idris2/tests/idris2/evaluator003/Issue705.idr
G. Allais 4a61146ba0
[ fix #705 ] Normalise primitives in mkPat (#718)
[ log ] prettier log for pats & clauses
[ re #650 ] Even lazier
[ fix #705 ] normalise primitives in mkPat
[ refactor ] introduce getPrimitiveNames
2020-10-02 12:22:57 +01:00

11 lines
224 B
Idris

-- %logging compile.casetree 5
-- %logging eval.casetree 5
-- %logging declare.def.lhs 5
bad : (a : Type) -> (x : a) -> String
bad String "good" = "good"
bad (List Nat) [1,2] = "good"
bad Char 'c' = "good"
bad _ _ = "bad"