Carp/examples/strings.carp
2017-10-13 13:50:15 +02:00

12 lines
194 B
Plaintext

(use Char)
(defn print-char [c]
(IO.println (refstr c)))
(defn to-robber-lang [s]
(let [cs (String.chars s)]
(Array.foreach print-char &cs)))
(defn main []
(to-robber-lang "erik"))