Idris2/tests/idris2/reflection011/tryref.idr

13 lines
221 B
Idris
Raw Normal View History

import Language.Reflection
%language ElabReflection
elabTry : Elab ()
elabTry
= try (declare `[ x : 94
x = 94 ])
(declare `[ x : Int
x = 94 ])
%runElab elabTry