mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-12-24 12:14:26 +03:00
31a5175a02
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).
5 lines
79 B
Idris
5 lines
79 B
Idris
%default total
|
|
|
|
ohNo : Void
|
|
ohNo = let (? ** x) = the (a ** a) (Int ** 5) in x
|