lean4-htt/tests/compiler/foreign/Main.lean
2021-11-04 15:32:07 -07:00

11 lines
277 B
Text

import Main.S
def main : IO Unit := do
IO.println (mkS 10 20 "hello").addXY
IO.println (mkS 10 20 "hello").string
appendToGlobalS "foo"
appendToGlobalS "bla"
getGlobalString >>= IO.println
updateGlobalS (mkS 0 0 "world")
getGlobalString >>= IO.println
pure ()