aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source
diff options
context:
space:
mode:
authorEduardo Julian2017-02-11 19:58:26 -0400
committerEduardo Julian2017-02-11 19:58:26 -0400
commit12dcb6e964e0c54f4001413bc62b8bcb526fa9c4 (patch)
treea48ddea9c03715eacf5d52427e62d3a383ced50e /stdlib/source
parent66ceed37b71921e14cae8a091df7738d9e587c2d (diff)
- Now doing common array analysis/compilation.
- Now doing common io/log! analysis/compilation. - Now doing common char/to-text analysis/compilation. - Expanded compilation of procedures in JS. - Expanded LuxRT in JS. - Fixed some bugs.
Diffstat (limited to 'stdlib/source')
-rw-r--r--stdlib/source/lux.lux17
1 files changed, 8 insertions, 9 deletions
diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux
index 1c74cac80..06c0fd2fd 100644
--- a/stdlib/source/lux.lux
+++ b/stdlib/source/lux.lux
@@ -2099,7 +2099,7 @@
#"\f" "\\f"
#"\"" "\\\""
#"\\" "\\\\"
- _ (_lux_proc ["jvm" "invokevirtual:java.lang.Object:toString:"] [x]))]
+ _ (_lux_proc ["char" "to-text"] [x]))]
($_ Text/append "#\"" as-text "\"")))
(macro:' #export (do-template tokens)
@@ -2241,6 +2241,13 @@
(-> Bool Bool)
(if x false true))
+(def:''' #export (log! message)
+ (list [["lux" "doc"] (#TextA "Logs message to standard output.
+
+ Useful for debugging.")])
+ (-> Text Unit)
+ (_lux_proc ["io" "log!"] [message]))
+
(def:''' (find-macro' modules current-module module name)
#Nil
(-> ($' List (& Text Module))
@@ -2998,14 +3005,6 @@
(#;Some (#;Right []))
(list (' #hidden))))
-(def:''' #export (log! message)
- (list [["lux" "doc"] (#TextA "Logs message to standard output.
-
- Useful for debugging.")])
- (-> Text Unit)
- (_lux_proc ["jvm" "invokevirtual:java.io.PrintStream:println:java.lang.String"]
- [(_lux_proc ["jvm" "getstatic:java.lang.System:out"] []) message]))
-
(macro:' #export (def: tokens)
(list [["lux" "doc"] (#TextA "## Defines global constants/functions.
(def: (rejoin-pair pair)