aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/target/jvm/attribute/code.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/lux/target/jvm/attribute/code.lux')
-rw-r--r--stdlib/source/lux/target/jvm/attribute/code.lux20
1 files changed, 0 insertions, 20 deletions
diff --git a/stdlib/source/lux/target/jvm/attribute/code.lux b/stdlib/source/lux/target/jvm/attribute/code.lux
index dff626c5c..44b3b1b5b 100644
--- a/stdlib/source/lux/target/jvm/attribute/code.lux
+++ b/stdlib/source/lux/target/jvm/attribute/code.lux
@@ -3,9 +3,6 @@
[type (#+ :share)]
[abstract
["." equivalence (#+ Equivalence)]]
- [control
- ["<>" parser
- ["<2>" binary (#+ Parser)]]]
[data
["." binary (#+ Binary)]
[format
@@ -62,23 +59,6 @@
))
## https://docs.oracle.com/javase/specs/jvms/se8/html/jvms-4.html#jvms-4.7.3
-(def: #export (parser parser)
- (All [Attribute] (-> (Parser Attribute) (Parser (Code Attribute))))
- ($_ <>.and
- ## u2 max_stack;
- ## u2 max_locals;
- ///resources.parser
- ## u4 code_length;
- ## u1 code[code_length];
- <2>.binary/32
- ## u2 exception_table_length;
- ## exception_table[exception_table_length];
- (<2>.row/16 /exception.parser)
- ## u2 attributes_count;
- ## attribute_info attributes[attributes_count];
- (<2>.row/16 parser)
- ))
-
(def: #export (writer writer code)
(All [Attribute] (-> (Writer Attribute) (Writer (Code Attribute))))
($_ binaryF@compose