mirror of
https://github.com/carp-lang/Carp.git
synced 2024-09-21 02:17:42 +03:00
13 lines
214 B
Plaintext
13 lines
214 B
Plaintext
(use Char)
|
|
(use Array)
|
|
|
|
(defn print-char [c]
|
|
(IO.println &(Char.str (Char.copy c))))
|
|
|
|
(defn to-robber-lang [s]
|
|
(let [cs (String.chars s)]
|
|
(foreach print-char cs)))
|
|
|
|
(defn main []
|
|
(to-robber-lang "erik"))
|