Pantograph/Test/Main.lean

9 lines
224 B
Plaintext
Raw Normal View History

2023-05-22 11:47:46 -07:00
import LSpec
import Pantograph.Symbols
open Pantograph
def main := do
LSpec.lspecIO $
LSpec.test "Symbol parsing" (Lean.Name.str (.str (.str .anonymous "Lean") "Meta") "run" = Pantograph.str_to_name "Lean.Meta.run")