From 4051a1cbe0999ee22bc395b059ea1556bcc002a0 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 1 Sep 2021 01:01:22 -0400
Subject: Updates to the JS compiler.

---
 stdlib/source/test/lux/meta/annotation.lux | 38 ------------------------------
 1 file changed, 38 deletions(-)

(limited to 'stdlib/source/test')

diff --git a/stdlib/source/test/lux/meta/annotation.lux b/stdlib/source/test/lux/meta/annotation.lux
index 772a403ad..a610d66eb 100644
--- a/stdlib/source/test/lux/meta/annotation.lux
+++ b/stdlib/source/test/lux/meta/annotation.lux
@@ -113,29 +113,6 @@
                                      /.implementation?)))))
             ))))
 
-(def: arguments
-  Test
-  (do {! random.monad}
-    [key ..random_key]
-    (`` ($_ _.and
-            (~~ (template [<definition> <tag>]
-                  [(do !
-                     [expected (random.list 5 (random.ascii/alpha 1))]
-                     (_.cover [<definition>]
-                              (and (|> expected (list\each code.text) code.tuple
-                                       (..annotation (name_of <tag>))
-                                       <definition>
-                                       (\ (list.equivalence text.equivalence) = expected))
-                                   (|> expected (list\each code.text) code.tuple
-                                       (..annotation key)
-                                       <definition>
-                                       (\ (list.equivalence text.equivalence) = (list))))))]
-
-                  [/.function_arguments #.func_args]
-                  [/.type_arguments #.type_args]
-                  ))
-            ))))
-
 (def: .public test
   Test
   (<| (_.covering /._)
@@ -153,21 +130,6 @@
                                             (code\= expected actual))))))
             
             ..typed_value
-            
-            (do !
-              [expected (random.ascii/alpha 10)]
-              (_.cover [/.documentation]
-                       (and (not (|> expected code.text
-                                     (..annotation key)
-                                     /.documentation
-                                     (!expect (^multi (#.Some actual)
-                                                      (\ text.equivalence = expected actual)))))
-                            (|> expected code.text
-                                (..annotation (name_of #.doc))
-                                /.documentation
-                                (!expect (^multi (#.Some actual)
-                                                 (\ text.equivalence = expected actual)))))))
 
             ..flag
-            ..arguments
             ))))
-- 
cgit v1.2.3