Separated reading and writing binary data (lumping them together was a bad idea in the first place).

1 files changed, 19 insertions, 7 deletions

diff --git a/stdlib/source/lux/target/jvm/attribute/code/exception.lux b/stdlib/source/lux/target/jvm/attribute/code/exception.lux
index c1f4bf581..6f6b8a0be 100644
--- a/stdlib/source/lux/target/jvm/attribute/code/exception.lux
+++ b/stdlib/source/lux/target/jvm/attribute/code/exception.lux
@@ -2,9 +2,12 @@
   [lux #*
    [abstract
     ["." equivalence (#+ Equivalence)]]
+   [control
+    ["<>" parser ("#@." functor)
+     ["<2>" binary (#+ Parser)]]]
    [data
     [format
-     [".F" binary (#+ Format)]]]]
+     [".F" binary (#+ Writer)]]]]
   ["." // #_
    ["#." label (#+ Label)]
    ["//#" /// #_
@@ -42,11 +45,20 @@
       ////unsigned.u2-bytes
       ))
 
-(def: #export format
-  (Format Exception)
+(def: #export parser
+  (Parser Exception)
+  ($_ <>.and
+      //label.parser
+      //label.parser
+      //label.parser
+      ////index.parser
+      ))
+
+(def: #export writer
+  (Writer Exception)
   ($_ binaryF.and
-      //label.format
-      //label.format
-      //label.format
-      ////index.format
+      //label.writer
+      //label.writer
+      //label.writer
+      ////index.writer
       ))