5df4e48dc9
This PR ensures that environments can be loaded, repeatedly, without executing arbitrary code
14 lines
458 B
Text
14 lines
458 B
Text
import Lean
|
|
|
|
open Lean
|
|
|
|
unsafe def tst : IO Unit :=
|
|
withImportModules #[{module := `Init.Data.Array}] {} fun env =>
|
|
match env.find? `Array.foldl with
|
|
| some info => do
|
|
IO.println (info.instantiateTypeLevelParams [levelZero, levelZero])
|
|
IO.println (info.instantiateValueLevelParams! [levelZero, levelZero])
|
|
IO.println (info.instantiateValueLevelParams! [levelZero])
|
|
| none => IO.println "Array.foldl not found"
|
|
|
|
#eval tst
|