mirror of
https://github.com/carp-lang/Carp.git
synced 2024-10-11 12:37:32 +03:00
11 lines
290 B
Plaintext
11 lines
290 B
Plaintext
(system-include "carp_io.h")
|
|
|
|
(defmodule IO
|
|
(register println (Fn [(Ref String)] ()))
|
|
(register print (Fn [(Ref String)] ()))
|
|
(register get-line (Fn [] String))
|
|
(register get-char (Fn [] Char) "getchar")
|
|
(register read-file (Fn [&String] String))
|
|
(register exit (Fn [Int] a))
|
|
)
|