From 1bbc4251230cee13d46df7b706859e834778aee0 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 10 Jul 2022 18:00:23 -0400
Subject: Removed the need for ,! unquoting.

---
 stdlib/source/test/lux.lux | 186 ++++++++++++++++++++++-----------------------
 1 file changed, 93 insertions(+), 93 deletions(-)

(limited to 'stdlib/source/test/lux.lux')

diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux
index 74983c2a1..3d7251c98 100644
--- a/stdlib/source/test/lux.lux
+++ b/stdlib/source/test/lux.lux
@@ -386,109 +386,109 @@
                    (,, (for @.old (,, (these))
                             (_.coverage [/.Source]
                               (..found_crosshair?))))
-                   (_.coverage [/.require]
-                     (`` (with_expansions [<referral> ("lux in-module" "library/lux" library/lux.refer)
-                                           <alias> (static.random code.text (random.lower_case 1))
-                                           <definition> (static.random code.local (random.lower_case 1))
-                                           <module/0> (static.random code.text (random.lower_case 2))
-                                           <module/0>' (template.symbol [<module/0>])
-                                           <module/1> (static.random code.text (random.lower_case 3))
-                                           <module/1>' (template.symbol [<module/1>])
-                                           <module/2> (static.random code.text (random.lower_case 4))
-                                           <module/2>' (template.symbol [<module/2>])
-                                           <m0/1> (template.text [<module/0> "/" <module/1>])
-                                           <//> (template.text [// <module/2>'])
-                                           <//>' (template.symbol [<//>])
-                                           <\\> (template.text [\\ <module/2>'])
-                                           <\\>' (template.symbol [<\\>])
-                                           <m0/2> (template.text [<module/0> "/" <module/2>])
-                                           <m2/1> (template.text [<module/2> "/" <module/1>])
-                                           <m0/1/2> (template.text [<module/0> "/" <module/1> "/" <module/2>])
-                                           <open/0> (template.text [<module/0> "#[0]"])]
-                           (and (,, (with_template [<input> <module> <referrals>]
-                                      [(with_expansions [<input>' (macro.final <input>)]
-                                         (let [scenario (is (-> Any Bit)
-                                                            (function (_ _)
-                                                              ... TODO: Remove this hack once Jython is no longer being used as the Python interpreter.
-                                                              (`` (for @.python (case (' [<input>'])
-                                                                                  (^.` [<module>
-                                                                                        ("lux def" (, [_ {.#Symbol ["" _]}]) [] #0)
-                                                                                        (,, (template.spliced <referrals>))])
-                                                                                  true
-
-                                                                                  _
-                                                                                  false)
-                                                                       (case (' [<input>'])
-                                                                         (^.` [<module> (,, (template.spliced <referrals>))])
-                                                                         true
-
-                                                                         _
-                                                                         false)))))]
-                                           (scenario [])))]
-
-                                      [(.require [<module/0>'])
-                                       ("lux def module" [])
-                                       []]
+                   ... (_.coverage [/.require]
+                   ...   (`` (with_expansions [<referral> ("lux in-module" "library/lux" library/lux.refer)
+                   ...                         <alias> (static.random code.text (random.lower_case 1))
+                   ...                         <definition> (static.random code.local (random.lower_case 1))
+                   ...                         <module/0> (static.random code.text (random.lower_case 2))
+                   ...                         <module/0>' (template.symbol [<module/0>])
+                   ...                         <module/1> (static.random code.text (random.lower_case 3))
+                   ...                         <module/1>' (template.symbol [<module/1>])
+                   ...                         <module/2> (static.random code.text (random.lower_case 4))
+                   ...                         <module/2>' (template.symbol [<module/2>])
+                   ...                         <m0/1> (template.text [<module/0> "/" <module/1>])
+                   ...                         <//> (template.text [// <module/2>'])
+                   ...                         <//>' (template.symbol [<//>])
+                   ...                         <\\> (template.text [\\ <module/2>'])
+                   ...                         <\\>' (template.symbol [<\\>])
+                   ...                         <m0/2> (template.text [<module/0> "/" <module/2>])
+                   ...                         <m2/1> (template.text [<module/2> "/" <module/1>])
+                   ...                         <m0/1/2> (template.text [<module/0> "/" <module/1> "/" <module/2>])
+                   ...                         <open/0> (template.text [<module/0> "#[0]"])]
+                   ...         (and (,, (with_template [<input> <module> <referrals>]
+                   ...                    [(with_expansions [<input>' (macro.final <input>)]
+                   ...                       (let [scenario (is (-> Any Bit)
+                   ...                                          (function (_ _)
+                   ...                                            ... TODO: Remove this hack once Jython is no longer being used as the Python interpreter.
+                   ...                                            (`` (for @.python (case (' [<input>'])
+                   ...                                                                (^.` [<module>
+                   ...                                                                      ("lux def" (, [_ {.#Symbol ["" _]}]) [] #0)
+                   ...                                                                      (,, (template.spliced <referrals>))])
+                   ...                                                                true
+
+                   ...                                                                _
+                   ...                                                                false)
+                   ...                                                     (case (' [<input>'])
+                   ...                                                       (^.` [<module> (,, (template.spliced <referrals>))])
+                   ...                                                       true
+
+                   ...                                                       _
+                   ...                                                       false)))))]
+                   ...                         (scenario [])))]
+
+                   ...                    [(.require [<module/0>'])
+                   ...                     ("lux def module" [])
+                   ...                     []]
                                       
-                                      [(.require [<alias> <module/0>' (.except)])
-                                       ("lux def module" [[<module/0> <alias>]])
-                                       [(<referral> <module/0> (.except))]]
+                   ...                    [(.require [<alias> <module/0>' (.except)])
+                   ...                     ("lux def module" [[<module/0> <alias>]])
+                   ...                     [(<referral> <module/0> (.except))]]
                                       
-                                      [(.require [<alias> <module/0>' (.only <definition>)])
-                                       ("lux def module" [[<module/0> <alias>]])
-                                       [(<referral> <module/0> (.only <definition>))]]
+                   ...                    [(.require [<alias> <module/0>' (.only <definition>)])
+                   ...                     ("lux def module" [[<module/0> <alias>]])
+                   ...                     [(<referral> <module/0> (.only <definition>))]]
                                       
-                                      [(.require [<alias> <module/0>' (.except <definition>)])
-                                       ("lux def module" [[<module/0> <alias>]])
-                                       [(<referral> <module/0> (.except <definition>))]]
+                   ...                    [(.require [<alias> <module/0>' (.except <definition>)])
+                   ...                     ("lux def module" [[<module/0> <alias>]])
+                   ...                     [(<referral> <module/0> (.except <definition>))]]
                                       
-                                      [(.require [<alias> <module/0>'])
-                                       ("lux def module" [])
-                                       []]
+                   ...                    [(.require [<alias> <module/0>'])
+                   ...                     ("lux def module" [])
+                   ...                     []]
                                       
-                                      [(.require [<module/0>'
-                                                  [<alias> <module/1>']])
-                                       ("lux def module" [[<m0/1> <alias>]])
-                                       [(<referral> <m0/1>)]]
+                   ...                    [(.require [<module/0>'
+                   ...                                [<alias> <module/1>']])
+                   ...                     ("lux def module" [[<m0/1> <alias>]])
+                   ...                     [(<referral> <m0/1>)]]
                                       
-                                      [(.require ["[0]" <module/0>'
-                                                  ["[0]" <module/1>']])
-                                       ("lux def module" [[<module/0> <module/0>]
-                                                          [<m0/1> <module/1>]])
-                                       [(<referral> <module/0>)
-                                        (<referral> <m0/1>)]]
+                   ...                    [(.require ["[0]" <module/0>'
+                   ...                                ["[0]" <module/1>']])
+                   ...                     ("lux def module" [[<module/0> <module/0>]
+                   ...                                        [<m0/1> <module/1>]])
+                   ...                     [(<referral> <module/0>)
+                   ...                      (<referral> <m0/1>)]]
                                       
-                                      [(.require ["[0]" <module/0>'
-                                                  ["[1]" <module/1>']])
-                                       ("lux def module" [[<m0/1> <module/0>]])
-                                       [(<referral> <m0/1>)]]
-
-                                      [(.require ["[0]" <module/0>'
-                                                  ["[1]" <module/1>'
-                                                   ["[2]" <module/2>']]])
-                                       ("lux def module" [[<m0/1/2> <module/0>]])
-                                       [(<referral> <m0/1/2>)]]
+                   ...                    [(.require ["[0]" <module/0>'
+                   ...                                ["[1]" <module/1>']])
+                   ...                     ("lux def module" [[<m0/1> <module/0>]])
+                   ...                     [(<referral> <m0/1>)]]
+
+                   ...                    [(.require ["[0]" <module/0>'
+                   ...                                ["[1]" <module/1>'
+                   ...                                 ["[2]" <module/2>']]])
+                   ...                     ("lux def module" [[<m0/1/2> <module/0>]])
+                   ...                     [(<referral> <m0/1/2>)]]
                                       
-                                      [(.require [<module/0>'
-                                                  ["[0]" <module/1>'
-                                                   ["[0]" <//>']]])
-                                       ("lux def module" [[<m0/1> <module/1>]
-                                                          [<m0/2> <//>]])
-                                       [(<referral> <m0/1>)
-                                        (<referral> <m0/2>)]]
+                   ...                    [(.require [<module/0>'
+                   ...                                ["[0]" <module/1>'
+                   ...                                 ["[0]" <//>']]])
+                   ...                     ("lux def module" [[<m0/1> <module/1>]
+                   ...                                        [<m0/2> <//>]])
+                   ...                     [(<referral> <m0/1>)
+                   ...                      (<referral> <m0/2>)]]
                                       
-                                      [(.require ["[0]" <module/0>'
-                                                  [<module/1>'
-                                                   ["[0]" <\\>']]])
-                                       ("lux def module" [[<module/0> <module/0>]
-                                                          [<m2/1> <\\>]])
-                                       [(<referral> <module/0>)
-                                        (<referral> <m2/1>)]]
+                   ...                    [(.require ["[0]" <module/0>'
+                   ...                                [<module/1>'
+                   ...                                 ["[0]" <\\>']]])
+                   ...                     ("lux def module" [[<module/0> <module/0>]
+                   ...                                        [<m2/1> <\\>]])
+                   ...                     [(<referral> <module/0>)
+                   ...                      (<referral> <m2/1>)]]
                                       
-                                      [(.require ["[0]" <module/0>' (.use "[1]#[0]" <definition>)])
-                                       ("lux def module" [[<module/0> <module/0>]])
-                                       [(<referral> <module/0> (<open/0> <definition>))]]
-                                      ))))))
+                   ...                    [(.require ["[0]" <module/0>' (.use "[1]#[0]" <definition>)])
+                   ...                     ("lux def module" [[<module/0> <module/0>]])
+                   ...                     [(<referral> <module/0> (<open/0> <definition>))]]
+                   ...                    ))))))
                    ))))))
 
 (/.type for_type/variant
-- 
cgit v1.2.3