This commit is contained in:
Erik 2016-03-04 11:55:20 +01:00
parent d1f2966c81
commit 211f51d5df
2 changed files with 3 additions and 1 deletions

View File

@ -256,7 +256,7 @@
(register-builtin "printret" '((:fn () :int)) :void)
;; A better println!
(defn printlng [x]
(defn println* [x]
(println (ref (str x))))
(register-builtin "platform" '() :int)

View File

@ -147,6 +147,8 @@
(defn mapping-strings []
(map exclaim [(string-copy "hej") (string-copy "san") (string-copy "svej") (string-copy "san")]))
(defn even-i? [x]
(if (even? x)
1