From 716ca5377386ca87eded7dd514ccc17f8ed281c3 Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Sun, 26 Jun 2022 02:57:13 -0400 Subject: De-sigil-ification: suffix : [Part 16] --- stdlib/source/test/aedifex/command/version.lux | 4 ++-- stdlib/source/test/aedifex/repository.lux | 6 +++--- stdlib/source/test/lux/control/concurrency/actor.lux | 4 ++-- stdlib/source/test/lux/control/concurrency/semaphore.lux | 2 +- stdlib/source/test/lux/control/exception.lux | 10 +++++----- stdlib/source/test/lux/control/region.lux | 4 ++-- stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux | 4 ++-- stdlib/source/test/lux/tool/compiler/phase.lux | 4 ++-- stdlib/source/test/lux/type/check.lux | 4 ++-- stdlib/source/test/lux/world/console.lux | 4 ++-- stdlib/source/test/lux/world/shell.lux | 4 ++-- 11 files changed, 25 insertions(+), 25 deletions(-) (limited to 'stdlib/source/test') diff --git a/stdlib/source/test/aedifex/command/version.lux b/stdlib/source/test/aedifex/command/version.lux index 4873cf31e..983262270 100644 --- a/stdlib/source/test/aedifex/command/version.lux +++ b/stdlib/source/test/aedifex/command/version.lux @@ -7,7 +7,7 @@ [control ["[0]" maybe] ["[0]" try] - ["[0]" exception (.only exception:)] + ["[0]" exception (.only exception)] [concurrency ["[0]" async (.only Async)]]] [data @@ -27,7 +27,7 @@ [\\program ["[0]" /]]) -(exception: .public console_is_closed!) +(exception .public console_is_closed!) (def mock (Mock [Bit Text]) diff --git a/stdlib/source/test/aedifex/repository.lux b/stdlib/source/test/aedifex/repository.lux index 1602fab49..a3caba277 100644 --- a/stdlib/source/test/aedifex/repository.lux +++ b/stdlib/source/test/aedifex/repository.lux @@ -9,7 +9,7 @@ [control ["[0]" io] ["[0]" try] - ["[0]" exception (.only exception:)]] + ["[0]" exception (.only exception)]] [data ["[0]" product] ["[0]" binary (.only Binary)] @@ -42,11 +42,11 @@ (-> Version Artifact) (|>> ["com.github.luxlang" "test-artifact"])) -(exception: (not_found [uri URI]) +(exception (not_found [uri URI]) (exception.report "URI" (%.text uri))) -(exception: (cannot_upload [uri URI]) +(exception (cannot_upload [uri URI]) (exception.report "URI" (%.text uri))) diff --git a/stdlib/source/test/lux/control/concurrency/actor.lux b/stdlib/source/test/lux/control/concurrency/actor.lux index ecc435a72..218dfcb3d 100644 --- a/stdlib/source/test/lux/control/concurrency/actor.lux +++ b/stdlib/source/test/lux/control/concurrency/actor.lux @@ -6,7 +6,7 @@ [monad (.only do)]] [control ["[0]" try (.only Try)] - ["[0]" exception (.only exception:)] + ["[0]" exception (.only exception)] ["[0]" io (.only IO io)]] [data [text @@ -25,7 +25,7 @@ ["[0]" async (.only Async Resolver) (.use "[1]#[0]" monad)] ["[0]" frp]]]]) -(exception: got_wrecked) +(exception got_wrecked) (def counter (/.Behavior Nat) diff --git a/stdlib/source/test/lux/control/concurrency/semaphore.lux b/stdlib/source/test/lux/control/concurrency/semaphore.lux index ec1a460c8..eeaac1f53 100644 --- a/stdlib/source/test/lux/control/concurrency/semaphore.lux +++ b/stdlib/source/test/lux/control/concurrency/semaphore.lux @@ -10,7 +10,7 @@ ["[0]" io] ["[0]" maybe] ["[0]" try] - ["[0]" exception (.only exception:)] + ["[0]" exception] [concurrency ["[0]" async (.only Async)] ["[0]" atom (.only Atom)]]] diff --git a/stdlib/source/test/lux/control/exception.lux b/stdlib/source/test/lux/control/exception.lux index e36deb494..c31a78b65 100644 --- a/stdlib/source/test/lux/control/exception.lux +++ b/stdlib/source/test/lux/control/exception.lux @@ -12,15 +12,15 @@ [number ["n" nat]]]]] [\\library - ["[0]" / (.only exception:) + ["[0]" / (.only) [// ["[0]" try (.only Try)]]]]) -(exception: an_exception) -(exception: another_exception) +(/.exception an_exception) +(/.exception another_exception) (def label "YOLO") -(exception: (custom_exception [value Nat]) +(/.exception (custom_exception [value Nat]) (/.report label (%.nat value))) (def .public test @@ -103,7 +103,7 @@ {try.#Failure message} (and (text.contains? (/.error ..an_exception []) message) (text.contains? (/.error ..another_exception []) message))))) - (_.coverage [/.exception:] + (_.coverage [/.exception] (case (/.except ..custom_exception [expected]) {try.#Success _} false diff --git a/stdlib/source/test/lux/control/region.lux b/stdlib/source/test/lux/control/region.lux index 37969d317..54dde9289 100644 --- a/stdlib/source/test/lux/control/region.lux +++ b/stdlib/source/test/lux/control/region.lux @@ -26,9 +26,9 @@ ["[0]" / (.only Region) [// ["[0]" thread (.only Thread)] - ["[0]" exception (.only Exception exception:)]]]]) + ["[0]" exception (.only Exception exception)]]]]) -(exception: oops) +(exception oops) (def (success? result) (All (_ a) (-> (Try a) Bit)) diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux index 4e0aa40a5..6fb6ebd02 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux @@ -11,7 +11,7 @@ ["<>" parser] ["[0]" pipe] ["[0]" try] - ["[0]" exception (.only exception:)] + ["[0]" exception (.only exception)] ["[0]" function] ["[0]" maybe]] [data @@ -373,7 +373,7 @@ (with_expansions [ (static.random_nat) (template.symbol ["exception_" ])] - (exception: ) + (exception ) (def test|phase Test diff --git a/stdlib/source/test/lux/tool/compiler/phase.lux b/stdlib/source/test/lux/tool/compiler/phase.lux index adad18aac..39ee0604b 100644 --- a/stdlib/source/test/lux/tool/compiler/phase.lux +++ b/stdlib/source/test/lux/tool/compiler/phase.lux @@ -10,7 +10,7 @@ [control ["[0]" pipe] ["[0]" try (.use "[1]#[0]" functor)] - ["[0]" exception (.only exception:)]] + ["[0]" exception (.only exception)]] [data ["[0]" text (.use "[1]#[0]" equivalence) ["%" \\format (.only format)]]] @@ -42,7 +42,7 @@ _ false))) -(exception: oops) +(exception oops) (def test|error Test diff --git a/stdlib/source/test/lux/type/check.lux b/stdlib/source/test/lux/type/check.lux index 3c45d4db4..89aa98285 100644 --- a/stdlib/source/test/lux/type/check.lux +++ b/stdlib/source/test/lux/type/check.lux @@ -13,7 +13,7 @@ ["[0]" pipe] ["[0]" function] ["[0]" try] - ["[0]" exception (.only exception:)]] + ["[0]" exception (.only exception)]] [data ["[0]" bit (.use "[1]#[0]" equivalence)] ["[0]" product] @@ -127,7 +127,7 @@ (Random Type) (primitive_type 2)) -(exception: yolo) +(exception yolo) (def error_handling Test diff --git a/stdlib/source/test/lux/world/console.lux b/stdlib/source/test/lux/world/console.lux index acc05df1f..9dd7975c7 100644 --- a/stdlib/source/test/lux/world/console.lux +++ b/stdlib/source/test/lux/world/console.lux @@ -7,7 +7,7 @@ [control ["[0]" io] ["[0]" try (.only Try)] - ["[0]" exception (.only exception:)]] + ["[0]" exception (.only exception)]] [data ["[0]" text (.use "[1]#[0]" equivalence) ["%" \\format (.only format)]]] @@ -18,7 +18,7 @@ [\\specification ["$[0]" /]]) -(exception: dead) +(exception dead) (def mock (/.Mock [Bit Text]) diff --git a/stdlib/source/test/lux/world/shell.lux b/stdlib/source/test/lux/world/shell.lux index 6a3679e3d..c8738d3a3 100644 --- a/stdlib/source/test/lux/world/shell.lux +++ b/stdlib/source/test/lux/world/shell.lux @@ -6,7 +6,7 @@ [monad (.only do)]] [control ["[0]" try (.only Try)] - ["[0]" exception (.only exception:)] + ["[0]" exception (.only exception)] ["[0]" io (.only IO)] [concurrency ["[0]" async (.only Async)]] @@ -28,7 +28,7 @@ [\\specification ["$[0]" /]]) -(exception: dead) +(exception dead) (def (mock [environment working_directory command arguments]) (-> [Environment Path /.Command (List /.Argument)] -- cgit v1.2.3