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]

---
 lux-ruby/source/program.lux | 22 +++++++++++-----------
 1 file changed, 11 insertions(+), 11 deletions(-)

(limited to 'lux-ruby')

diff --git a/lux-ruby/source/program.lux b/lux-ruby/source/program.lux
index 30940108e..b145ca59d 100644
--- a/lux-ruby/source/program.lux
+++ b/lux-ruby/source/program.lux
@@ -10,7 +10,7 @@
    [control
     ["[0]" maybe]
     ["[0]" try (.only Try)]
-    ["[0]" exception (.only exception:)]
+    ["[0]" exception (.only exception)]
     ["[0]" io (.only IO io)]
     ["[0]" function]
     [concurrency
@@ -251,7 +251,7 @@
             failure))
         {try.#Success output}))))
 
-(exception: (unknown_kind_of_object [object java/lang/Object])
+(exception (unknown_kind_of_object [object java/lang/Object])
   (exception.report
    "Class" (ffi.of_string (java/lang/Object::toString (java/lang/Object::getClass object)))
    "Object" (ffi.of_string (java/lang/Object::toString object))))
@@ -280,7 +280,7 @@
     _
     (exception.except ..unknown_kind_of_object [(ffi.is java/lang/Object host_object)])))
 
-(exception: .public nil_has_no_lux_representation)
+(exception .public nil_has_no_lux_representation)
 
 (def (read host_object)
   Translator
@@ -348,11 +348,11 @@
                                                        (useful_object_class again (as (Array java/lang/Object) value))
                                                        (ffi.is java/lang/Object value)))))))
 
-(exception: (invalid_variant_access [field Text])
+(exception (invalid_variant_access [field Text])
   (exception.report
    "Field" (%.text field)))
 
-(exception: (invalid_index [index java/lang/Object])
+(exception (invalid_index [index java/lang/Object])
   (exception.report
    "Class" (|> index
                java/lang/Object::getClass
@@ -366,7 +366,7 @@
   "[1]::[0]"
   ("static" [t] copyOfRange [[t] int int] [t]))
 
-(exception: (invalid_arity [arity Nat])
+(exception (invalid_arity [arity Nat])
   (exception.report
    "Arity" (%.nat arity)))
 
@@ -602,7 +602,7 @@
              (org/jruby/RubyString::newInternalFromJavaExternal ..initial_ruby_runtime)
              (ffi.is org/jruby/runtime/builtin/IRubyObject))))))
 
-(exception: (invalid_operation [method Text])
+(exception (invalid_operation [method Text])
   (exception.report
    "Method" (%.text method)))
 
@@ -648,7 +648,7 @@
            {.#None}
            (panic! (exception.error ..invalid_operation ["respond_to?"])))))))
 
-(exception: (unknown_method [method Text])
+(exception (unknown_method [method Text])
   (exception.report
    "Method" (%.text method)))
 
@@ -692,7 +692,7 @@
                                              (useful_object_class lux_structure value)
                                              (as java/lang/Object value))))
 
-(exception: (cannot_apply_a_non_function [object java/lang/Object])
+(exception (cannot_apply_a_non_function [object java/lang/Object])
   (exception.report
    "Non-function" (ffi.of_string (java/lang/Object::toString object))))
 
@@ -772,8 +772,8 @@
                  [_ (run! content)]
                  (run! (_.global (reference.artifact context))))))))))
 
-(for @.jvm (these (exception: .public (invaid_phase_application [partial_application (List Any)
-                                                                 arity (List Any)])
+(for @.jvm (these (exception .public (invaid_phase_application [partial_application (List Any)
+                                                                arity (List Any)])
                     (exception.report
                      "Partial Application" (%.nat (list.size partial_application))
                      "Arity" (%.nat (list.size arity))))
-- 
cgit v1.2.3