Added STDLIB documentation for the different target platforms.

5 files changed, 164 insertions, 153 deletions

diff --git a/stdlib/source/documentation/lux/world/console.lux b/stdlib/source/documentation/lux/world/console.lux
index 97ee7bacf..c091e6d36 100644
--- a/stdlib/source/documentation/lux/world/console.lux
+++ b/stdlib/source/documentation/lux/world/console.lux
@@ -1,17 +1,18 @@
 (.using
-  [library
-   [lux "*"
-    ["$" documentation {"+" documentation:}]
-    [control
-     ["<>" parser
-      ["<[0]>" code]]]
-    [data
-     ["[0]" text {"+" \n}
-      ["%" format {"+" format}]]]
-    [macro
-     ["[0]" template]]]]
-  [\\library
-   ["[0]" /]])
+ [library
+  [lux "*"
+   ["$" documentation {"+" documentation:}]
+   ["@" target]
+   [control
+    ["<>" parser
+     ["<[0]>" code]]]
+   [data
+    ["[0]" text {"+" \n}
+     ["%" format {"+" format}]]]
+   [macro
+    ["[0]" template]]]]
+ [\\library
+  ["[0]" /]])
 
 (documentation: (/.Console !)
   "An interface to console/terminal I/O.")
@@ -30,14 +31,15 @@
 
 (.def: .public documentation
   (.List $.Module)
-  ($.module /._
-            ""
-            [..Console
-             ..write_line
-             ..Mock
-             ..mock
-             ($.default /.async)
-             ($.default /.cannot_open)
-             ($.default /.cannot_close)
-             ($.default /.default)]
-            []))
+  (`` (`` ($.module /._
+                    ""
+                    [..Console
+                     ..write_line
+                     ..Mock
+                     ..mock
+                     ($.default /.async)
+                     (~~ (for [@.jvm (~~ (as_is ($.default /.cannot_open)
+                                                ($.default /.cannot_close)
+                                                ($.default /.default)))]
+                              (~~ (as_is))))]
+                    []))))
diff --git a/stdlib/source/documentation/lux/world/file.lux b/stdlib/source/documentation/lux/world/file.lux
index 866ecf959..e2f203abe 100644
--- a/stdlib/source/documentation/lux/world/file.lux
+++ b/stdlib/source/documentation/lux/world/file.lux
@@ -1,19 +1,20 @@
 (.using
-  [library
-   [lux "*"
-    ["$" documentation {"+" documentation:}]
-    [control
-     ["<>" parser
-      ["<[0]>" code]]]
-    [data
-     ["[0]" text {"+" \n}
-      ["%" format {"+" format}]]]
-    [macro
-     ["[0]" template]]]]
-  [\\library
-   ["[0]" /]]
-  ["[0]" / "_"
-   ["[1][0]" watch]])
+ [library
+  [lux "*"
+   ["$" documentation {"+" documentation:}]
+   ["@" target]
+   [control
+    ["<>" parser
+     ["<[0]>" code]]]
+   [data
+    ["[0]" text {"+" \n}
+     ["%" format {"+" format}]]]
+   [macro
+    ["[0]" template]]]]
+ [\\library
+  ["[0]" /]]
+ ["[0]" / "_"
+  ["[1][0]" watch]])
 
 (documentation: /.Path
   "A path to a file or a directory in a file-system.")
@@ -53,24 +54,28 @@
 
 (.def: .public documentation
   (.List $.Module)
-  ($.module /._
-            ""
-            [..Path
-             ..System
-             ..parent
-             ..name
-             ..rooted
-             ..exists?
-             ..mock
-             ..make_directories
-             ..make_file
-             ($.default /.async)
-             ($.default /.cannot_make_file)
-             ($.default /.cannot_find_file)
-             ($.default /.cannot_delete)
-             ($.default /.cannot_make_directory)
-             ($.default /.cannot_find_directory)
-             ($.default /.cannot_read_all_data)
-             ($.default /.cannot_modify_file)
-             ($.default /.default)]
-            [/watch.documentation]))
+  (`` (`` ($.module /._
+                    ""
+                    [..Path
+                     ..System
+                     ..parent
+                     ..name
+                     ..rooted
+                     ..exists?
+                     ..mock
+                     ..make_directories
+                     ..make_file
+                     ($.default /.async)
+                     ($.default /.cannot_make_file)
+                     ($.default /.cannot_find_file)
+                     ($.default /.cannot_delete)
+                     ($.default /.cannot_make_directory)
+                     ($.default /.cannot_find_directory)
+                     ($.default /.cannot_read_all_data)
+                     (~~ (for [@.jvm (~~ (as_is ($.default /.cannot_modify_file)
+                                                ($.default /.default)))
+                               @.js (~~ (as_is ($.default /.default)))
+                               @.python (~~ (as_is ($.default /.default)))
+                               @.ruby (~~ (as_is ($.default /.default)))]
+                              (~~ (as_is))))]
+                    [/watch.documentation]))))
diff --git a/stdlib/source/documentation/lux/world/file/watch.lux b/stdlib/source/documentation/lux/world/file/watch.lux
index 3328fba20..14b9faa0a 100644
--- a/stdlib/source/documentation/lux/world/file/watch.lux
+++ b/stdlib/source/documentation/lux/world/file/watch.lux
@@ -1,17 +1,18 @@
 (.using
-  [library
-   [lux "*"
-    ["$" documentation {"+" documentation:}]
-    [control
-     ["<>" parser
-      ["<[0]>" code]]]
-    [data
-     ["[0]" text {"+" \n}
-      ["%" format {"+" format}]]]
-    [macro
-     ["[0]" template]]]]
-  [\\library
-   ["[0]" /]])
+ [library
+  [lux "*"
+   ["$" documentation {"+" documentation:}]
+   ["@" target]
+   [control
+    ["<>" parser
+     ["<[0]>" code]]]
+   [data
+    ["[0]" text {"+" \n}
+     ["%" format {"+" format}]]]
+   [macro
+    ["[0]" template]]]]
+ [\\library
+  ["[0]" /]])
 
 (documentation: /.Concern
   "A particular concern to watch-out for.")
@@ -33,26 +34,28 @@
           \n "Must be given a path separator for the file-system.")
   [(mock separator)])
 
-(documentation: /.default
-  "The default watcher for the default file-system.")
+(for [@.jvm (as_is (documentation: /.default
+                     "The default watcher for the default file-system."))]
+     (as_is))
 
 (.def: .public documentation
   (.List $.Module)
-  ($.module /._
-            ""
-            [..Concern
-             ..also
-             ..Watcher
-             ..polling
-             ..mock
-             ..default
-             ($.default /.creation)
-             ($.default /.creation?)
-             ($.default /.modification)
-             ($.default /.modification?)
-             ($.default /.deletion)
-             ($.default /.deletion?)
-             ($.default /.all)
-             ($.default /.not_being_watched)
-             ($.default /.cannot_poll_a_non_existent_directory)]
-            []))
+  (`` (`` ($.module /._
+                    ""
+                    [..Concern
+                     ..also
+                     ..Watcher
+                     ..polling
+                     ..mock
+                     ($.default /.creation)
+                     ($.default /.creation?)
+                     ($.default /.modification)
+                     ($.default /.modification?)
+                     ($.default /.deletion)
+                     ($.default /.deletion?)
+                     ($.default /.all)
+                     ($.default /.not_being_watched)
+                     ($.default /.cannot_poll_a_non_existent_directory)
+                     (~~ (for [@.jvm (~~ (as_is ..default))]
+                              (~~ (as_is))))]
+                    []))))
diff --git a/stdlib/source/documentation/lux/world/net/http/client.lux b/stdlib/source/documentation/lux/world/net/http/client.lux
index d3124090c..a11e8a0bb 100644
--- a/stdlib/source/documentation/lux/world/net/http/client.lux
+++ b/stdlib/source/documentation/lux/world/net/http/client.lux
@@ -1,17 +1,18 @@
 (.using
-  [library
-   [lux "*"
-    ["$" documentation {"+" documentation:}]
-    [control
-     ["<>" parser
-      ["<[0]>" code]]]
-    [data
-     ["[0]" text {"+" \n}
-      ["%" format {"+" format}]]]
-    [macro
-     ["[0]" template]]]]
-  [\\library
-   ["[0]" /]])
+ [library
+  [lux "*"
+   ["$" documentation {"+" documentation:}]
+   ["@" target]
+   [control
+    ["<>" parser
+     ["<[0]>" code]]]
+   [data
+    ["[0]" text {"+" \n}
+     ["%" format {"+" format}]]]
+   [macro
+    ["[0]" template]]]]
+ [\\library
+  ["[0]" /]])
 
 (documentation: (/.Client !)
   "A HTTP client capable of issuing requests to a HTTP server.")
@@ -29,26 +30,24 @@
   [/.connect]
   [/.options]
   [/.trace]
-  [/.default]
-  [/.async]
-  [/.headers]
   )
 
 (.def: .public documentation
   (.List $.Module)
-  ($.module /._
-            ""
-            [..Client
-             ..post
-             ..get
-             ..put
-             ..patch
-             ..delete
-             ..head
-             ..connect
-             ..options
-             ..trace
-             ..default
-             ..async
-             ..headers]
-            []))
+  (`` (`` ($.module /._
+                    ""
+                    [..Client
+                     ..post
+                     ..get
+                     ..put
+                     ..patch
+                     ..delete
+                     ..head
+                     ..connect
+                     ..options
+                     ..trace
+                     ($.default /.async)
+                     ($.default /.headers)
+                     (~~ (for [@.jvm (~~ (as_is ($.default /.default)))]
+                              (~~ (as_is))))]
+                    []))))
diff --git a/stdlib/source/documentation/lux/world/shell.lux b/stdlib/source/documentation/lux/world/shell.lux
index 9b283f847..0a39e0c6a 100644
--- a/stdlib/source/documentation/lux/world/shell.lux
+++ b/stdlib/source/documentation/lux/world/shell.lux
@@ -1,17 +1,18 @@
 (.using
-  [library
-   [lux "*"
-    ["$" documentation {"+" documentation:}]
-    [control
-     ["<>" parser
-      ["<[0]>" code]]]
-    [data
-     ["[0]" text {"+" \n}
-      ["%" format {"+" format}]]]
-    [macro
-     ["[0]" template]]]]
-  [\\library
-   ["[0]" /]])
+ [library
+  [lux "*"
+   ["$" documentation {"+" documentation:}]
+   ["@" target]
+   [control
+    ["<>" parser
+     ["<[0]>" code]]]
+   [data
+    ["[0]" text {"+" \n}
+     ["%" format {"+" format}]]]
+   [macro
+    ["[0]" template]]]]
+ [\\library
+  ["[0]" /]])
 
 (documentation: /.Exit
   "A program exit code.")
@@ -37,18 +38,19 @@
 
 (.def: .public documentation
   (.List $.Module)
-  ($.module /._
-            ""
-            [..Exit
-             ..Process
-             ..Command
-             ..Argument
-             ..Shell
-             ..Mock
-             ..mock
-             ($.default /.normal)
-             ($.default /.error)
-             ($.default /.async)
-             ($.default /.no_more_output)
-             ($.default /.default)]
-            []))
+  (`` (`` ($.module /._
+                    ""
+                    [..Exit
+                     ..Process
+                     ..Command
+                     ..Argument
+                     ..Shell
+                     ..Mock
+                     ..mock
+                     ($.default /.normal)
+                     ($.default /.error)
+                     ($.default /.async)
+                     (~~ (for [@.jvm (~~ (as_is ($.default /.no_more_output)
+                                                ($.default /.default)))]
+                              (~~ (as_is))))]
+                    []))))