diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/lux/compiler/meta/io/archive.lux (renamed from stdlib/source/lux/language/compiler/meta/io/archive.lux) | 23 |
1 files changed, 12 insertions, 11 deletions
diff --git a/stdlib/source/lux/language/compiler/meta/io/archive.lux b/stdlib/source/lux/compiler/meta/io/archive.lux index 5a7789a95..1c5924df7 100644 --- a/stdlib/source/lux/language/compiler/meta/io/archive.lux +++ b/stdlib/source/lux/compiler/meta/io/archive.lux @@ -10,8 +10,9 @@ [world ["." file (#+ File System)] [binary (#+ Binary)]]] - ["." /////host] - ["." // (#+ Module)]) + ["." // (#+ Module) + [/// + ["." host]]]) (type: #export Document File) @@ -22,15 +23,15 @@ (def: #export (archive System<m> root) (All [m] (-> (System m) File File)) (<| (format root (:: System<m> separator)) - (`` (for {(~~ (static /////host.common-lisp)) /////host.common-lisp - (~~ (static /////host.js)) /////host.js - (~~ (static /////host.jvm)) /////host.jvm - (~~ (static /////host.lua)) /////host.lua - (~~ (static /////host.php)) /////host.php - (~~ (static /////host.python)) /////host.python - (~~ (static /////host.r)) /////host.r - (~~ (static /////host.ruby)) /////host.ruby - (~~ (static /////host.scheme)) /////host.scheme})))) + (`` (for {(~~ (static host.common-lisp)) host.common-lisp + (~~ (static host.js)) host.js + (~~ (static host.jvm)) host.jvm + (~~ (static host.lua)) host.lua + (~~ (static host.php)) host.php + (~~ (static host.python)) host.python + (~~ (static host.r)) host.r + (~~ (static host.ruby)) host.ruby + (~~ (static host.scheme)) host.scheme})))) (def: #export (document System<m> root module) (All [m] (-> (System m) File Module Document)) |