diff options
Diffstat (limited to 'stdlib/source/lux/target/jvm/attribute/code.lux')
-rw-r--r-- | stdlib/source/lux/target/jvm/attribute/code.lux | 20 |
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 |