diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/library/lux/ffi.lux | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/stdlib/source/library/lux/ffi.lux b/stdlib/source/library/lux/ffi.lux index c515749a9..e55e55271 100644 --- a/stdlib/source/library/lux/ffi.lux +++ b/stdlib/source/library/lux/ffi.lux @@ -186,22 +186,22 @@ ... else (these)) -(with_expansions [<constant> (for @.js "js constant" +(with_expansions [<constant> (for @.js .js_constant# @.python .python_constant# @.lua .lua_constant# @.ruby .ruby_constant#) - <apply> (for @.js "js apply" + <apply> (for @.js .js_apply# @.python .python_apply# @.lua .lua_apply# @.ruby .ruby_apply#) - <new> (for @.js "js object new" + <new> (for @.js .js_object_new# @.python .python_apply# (these)) - <do> (for @.js "js object do" + <do> (for @.js .js_object_do# @.python .python_object_do# @.lua .lua_object_do# @.ruby .ruby_object_do#) - <get> (for @.js "js object get" + <get> (for @.js .js_object_get# @.python .python_object_get# @.lua .lua_object_get# @.ruby .ruby_object_get# @@ -213,7 +213,7 @@ @.lua .lua_import# @.ruby .ruby_import# (these)) - <function> (for @.js "js function" + <function> (for @.js .js_function# @.python .python_function# @.lua .lua_function# (these))] @@ -460,8 +460,8 @@ (, g!it') (.panic! "Invalid output."))))))))))] - (,, (for @.js [null "js object null" - null? "js object null?"] + (,, (for @.js [null .js_object_null# + null? .js_object_null?#] @.python [none .python_object_none# none? .python_object_none?#] @.lua [nil .lua_object_nil# @@ -828,13 +828,13 @@ (for @.js (these (def .public type_of (template (type_of object) - [("js type-of" object)])) + [(.js_type_of# object)])) (def .public global (syntax (_ [type <code>.any [head tail] (<code>.tuple (<>.and <code>.local (<>.some <code>.local)))]) (with_symbols [g!_] - (let [global (` ("js constant" (, (code.text head))))] + (let [global (` (.js_constant# (, (code.text head))))] (when tail {.#End} (in (list (` (is (.Maybe (, type)) @@ -878,7 +878,7 @@ Bit (|> (..global (Object Any) [process]) (maybe#each (|>> [] - ("js apply" ("js constant" "Object.prototype.toString.call")) + (.js_apply# (.js_constant# "Object.prototype.toString.call")) (as Text) (text#= "[object process]"))) (maybe.else false)))) |