Carp/examples/strings.carp

(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"))
Put foreach macro into the Array module. 2017-10-13 14:50:15 +03:00			`(use Char)`

Changed signature of 'Array.transform' function. 2017-10-13 14:44:27 +03:00			`(defn print-char [c]`
Put foreach macro into the Array module. 2017-10-13 14:50:15 +03:00			`(IO.println (refstr c)))`
Changed signature of 'Array.transform' function. 2017-10-13 14:44:27 +03:00
Removed left-over trace. 2017-10-13 13:48:18 +03:00			`(defn to-robber-lang [s]`
Changed signature of 'Array.transform' function. 2017-10-13 14:44:27 +03:00			`(let [cs (String.chars s)]`
Put foreach macro into the Array module. 2017-10-13 14:50:15 +03:00			`(Array.foreach print-char &cs)))`
Changed signature of 'Array.transform' function. 2017-10-13 14:44:27 +03:00
			`(defn main []`
			`(to-robber-lang "erik"))`