aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/target/jvm/attribute/code.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/lux/target/jvm/attribute/code.lux10
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/lux/target/jvm/attribute/code.lux b/stdlib/source/lux/target/jvm/attribute/code.lux
index 29d027b4d..328214859 100644
--- a/stdlib/source/lux/target/jvm/attribute/code.lux
+++ b/stdlib/source/lux/target/jvm/attribute/code.lux
@@ -24,7 +24,7 @@
(type: #export (Code Attribute)
{#limit Limit
#code Binary
- #exception-table (Row Exception)
+ #exception_table (Row Exception)
#attributes (Row Attribute)})
(def: #export (length length code)
@@ -41,7 +41,7 @@
///unsigned.bytes/2
## exception_table[exception_table_length];
(|> code
- (get@ #exception-table)
+ (get@ #exception_table)
row.size
(n.* /exception.length))
## u2 attributes_count;
@@ -52,14 +52,14 @@
(row\map length)
(row\fold n.+ 0))))
-(def: #export (equivalence attribute-equivalence)
+(def: #export (equivalence attribute_equivalence)
(All [attribute]
(-> (Equivalence attribute) (Equivalence (Code attribute))))
($_ product.equivalence
///limit.equivalence
binary.equivalence
(row.equivalence /exception.equivalence)
- (row.equivalence attribute-equivalence)
+ (row.equivalence attribute_equivalence)
))
## https://docs.oracle.com/javase/specs/jvms/se8/html/jvms-4.html#jvms-4.7.3
@@ -74,7 +74,7 @@
(binaryF.binary/32 (get@ #code code))
## u2 exception_table_length;
## exception_table[exception_table_length];
- ((binaryF.row/16 /exception.writer) (get@ #exception-table code))
+ ((binaryF.row/16 /exception.writer) (get@ #exception_table code))
## u2 attributes_count;
## attribute_info attributes[attributes_count];
((binaryF.row/16 writer) (get@ #attributes code))