(defmodule IO
(register println (Fn [(Ref String)] ()))
(register print (Fn [(Ref String)] ()))
(register get-line (Fn [] String))
(register exit (Fn [Int] a))
)