11 lines
301 B
Plaintext
11 lines
301 B
Plaintext
import LSpec
|
|
import Pantograph.Symbols
|
|
|
|
namespace Pantograph.Test
|
|
|
|
def test_serial: IO LSpec.TestSeq := do
|
|
return LSpec.group "Serialisation" $
|
|
LSpec.test "Symbol parsing" (Lean.Name.str (.str (.str .anonymous "Lean") "Meta") "run" = Pantograph.str_to_name "Lean.Meta.run")
|
|
|
|
end Pantograph.Test
|