aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/target/jvm/attribute/code/exception.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/lux/target/jvm/attribute/code/exception.lux')
-rw-r--r--stdlib/source/lux/target/jvm/attribute/code/exception.lux26
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
))