From 41495e32d3f5f88b5f189f48dd4fdbfa883c6ac0 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Mon, 14 Mar 2022 18:27:37 -0400
Subject: De-sigil-ification: >

---
 lux-jvm/source/luxc/lang/directive/jvm.lux | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

(limited to 'lux-jvm/source/luxc/lang/directive/jvm.lux')

diff --git a/lux-jvm/source/luxc/lang/directive/jvm.lux b/lux-jvm/source/luxc/lang/directive/jvm.lux
index 19e98ae20..323c337d5 100644
--- a/lux-jvm/source/luxc/lang/directive/jvm.lux
+++ b/lux-jvm/source/luxc/lang/directive/jvm.lux
@@ -5,7 +5,7 @@
    [abstract
     ["[0]" monad {"+" do}]]
    [control
-    [pipe {"+" case>}]
+    ["[0]" pipe]
     ["[0]" try {"+" Try}]
     ["<>" parser
      ["<[0]>" code {"+" Parser}]
@@ -857,16 +857,16 @@
 
 (def: visibility
   (-> ffi.Privacy jvm.Visibility)
-  (|>> (case> {ffi.#PublicP} {jvm.#Public}
-              {ffi.#PrivateP} {jvm.#Private}
-              {ffi.#ProtectedP} {jvm.#Protected}
-              {ffi.#DefaultP} {jvm.#Default})))
+  (|>> (pipe.case {ffi.#PublicP} {jvm.#Public}
+         {ffi.#PrivateP} {jvm.#Private}
+         {ffi.#ProtectedP} {jvm.#Protected}
+         {ffi.#DefaultP} {jvm.#Default})))
 
 (def: field_config
   (-> ffi.State jvm.Field_Config)
-  (|>> (case> {ffi.#VolatileS} jvm.volatileF
-              {ffi.#FinalS} jvm.finalF
-              {ffi.#DefaultS} jvm.noneF)))
+  (|>> (pipe.case {ffi.#VolatileS} jvm.volatileF
+         {ffi.#FinalS} jvm.finalF
+         {ffi.#DefaultS} jvm.noneF)))
 
 (def: (field_header [name privacy state annotations type])
   (-> Field jvm.Def)
-- 
cgit v1.2.3