diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/lux/target/jvm/constant/pool.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/lux/target/jvm/constant/pool.lux b/stdlib/source/lux/target/jvm/constant/pool.lux index b0d5c46fa..2e4ff9937 100644 --- a/stdlib/source/lux/target/jvm/constant/pool.lux +++ b/stdlib/source/lux/target/jvm/constant/pool.lux @@ -53,7 +53,7 @@ (with-expansions [<try-again> (as-is (recur (.inc idx)))] (loop [idx 0] (case (row.nth idx pool) - (#.Some entry) + (#try.Success entry) (case entry [index (<tag> reference)] (if (:: <equivalence> = reference <value>') @@ -64,7 +64,7 @@ _ <try-again>) - #.None + (#try.Failure _) (let [new (<tag> <value>')] (do try.monad [@new (//unsigned.u2 (//.size new)) |