Idris2/tests/idris2/error018/Issue1031-4.idr

mirror of https://github.com/idris-lang/Idris2.git synced 2024-12-20 18:21:47 +03:00
%default total

nice : (x : Bool) -> x === True
nice .(_) = Refl
[ re #1031 ] Disallow `?` patterns on the LHS We do this during desugaring because elaboration may insert valid `?` values on the LHS (e.g. when elaborating things that cannot be pattern-matched on and should be checked to be forced). 2021-05-18 15:44:16 +03:00			`%default total`

			`nice : (x : Bool) -> x === True`
			`nice .(_) = Refl`