Re-named "spec" hierarchy to "specification".

6 files changed, 18 insertions, 5 deletions

diff --git a/stdlib/source/test/lux/world/console.lux b/stdlib/source/test/lux/world/console.lux
index 055ee1466..c34a5c488 100644
--- a/stdlib/source/test/lux/world/console.lux
+++ b/stdlib/source/test/lux/world/console.lux
@@ -15,7 +15,7 @@
      ["." random]]]]
   [\\library
    ["." /]]
-  [\\spec
+  [\\specification
    ["$." /]])
 
 (exception: dead)
diff --git a/stdlib/source/test/lux/world/file.lux b/stdlib/source/test/lux/world/file.lux
index 1074749f4..ecc596399 100644
--- a/stdlib/source/test/lux/world/file.lux
+++ b/stdlib/source/test/lux/world/file.lux
@@ -12,7 +12,7 @@
    ["#." watch]]
   [\\library
    ["." /]]
-  [\\spec
+  [\\specification
    ["$." /]])
 
 (def: #export test
diff --git a/stdlib/source/test/lux/world/file/watch.lux b/stdlib/source/test/lux/world/file/watch.lux
index a4a8748ed..bbbcdf680 100644
--- a/stdlib/source/test/lux/world/file/watch.lux
+++ b/stdlib/source/test/lux/world/file/watch.lux
@@ -183,4 +183,17 @@
                                           after_deletion!)))]
                     (_.cover' [/.mock /.polling]
                               (try.default false verdict)))))
+          (do random.monad
+            [directory (random.ascii/alpha 5)
+             #let [/ "/"
+                   [fs watcher] (/.mock /)]]
+            (wrap (do promise.monad
+                    [started? ( \ watcher start /.all directory)]
+                    (_.cover' [/.cannot_poll_a_non_existent_directory]
+                              (case started?
+                                (#try.Success _)
+                                false
+                                
+                                (#try.Failure error)
+                                (exception.match? /.cannot_poll_a_non_existent_directory error))))))
           )))
diff --git a/stdlib/source/test/lux/world/output/video/resolution.lux b/stdlib/source/test/lux/world/output/video/resolution.lux
index 1cfcd0ae8..671b1952c 100644
--- a/stdlib/source/test/lux/world/output/video/resolution.lux
+++ b/stdlib/source/test/lux/world/output/video/resolution.lux
@@ -4,7 +4,7 @@
     ["_" test (#+ Test)]
     [abstract
      [monad (#+ do)]
-     [\\spec
+     [\\specification
       ["$." equivalence]
       ["$." hash]]]
     [data
diff --git a/stdlib/source/test/lux/world/program.lux b/stdlib/source/test/lux/world/program.lux
index fafda5f91..0028cfe9c 100644
--- a/stdlib/source/test/lux/world/program.lux
+++ b/stdlib/source/test/lux/world/program.lux
@@ -25,7 +25,7 @@
    ["." /
     [//
      [file (#+ Path)]]]]
-  [\\spec
+  [\\specification
    ["$." /]])
 
 (def: (environment env_size)
diff --git a/stdlib/source/test/lux/world/shell.lux b/stdlib/source/test/lux/world/shell.lux
index 8d117eefa..749441a7a 100644
--- a/stdlib/source/test/lux/world/shell.lux
+++ b/stdlib/source/test/lux/world/shell.lux
@@ -25,7 +25,7 @@
    ["." /
     [//
      [file (#+ Path)]]]]
-  [\\spec
+  [\\specification
    ["$." /]])
 
 (exception: dead)