mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-12-21 10:41:59 +03:00
15 lines
191 B
Idris
15 lines
191 B
Idris
|
module BadElabScript
|
||
|
|
|
||
|
|
import Language.Reflection
|
||
|
|
|
||
|
|
%language ElabReflection
|
||
|
|
|
||
|
|
x : Elab Nat
|
||
|
|
x = do
|
||
|
|
ignore $ check {expected=Type} `(Nat)
|
||
|
|
?someHole
|
||
|
|
check `(%search)
|
||
|
|
|
||
|
|
y : Nat
|
||
|
|
y = %runElab x
|