diff options
| author | Eduardo Julian | 2019-05-05 19:50:11 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2019-05-05 19:50:11 -0400 |
| commit | 4a81610a54b43b2084976ee4ebc86b3b94fb047c (patch) | |
| tree | 194a961cda8991563cdc84c891073642e12b9cfa /stdlib/source/lux/target/jvm/loader.old.lux | |
| parent | 1bce0132321794e421508ae687c9b1b68725a088 (diff) | |
Can now set the name of the "this" object, instead of being forced to use "_jvm_this".
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/lux/target/jvm/loader.old.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/lux/target/jvm/loader.old.lux b/stdlib/source/lux/target/jvm/loader.old.lux index 0ca92fa23..57a715107 100644 --- a/stdlib/source/lux/target/jvm/loader.old.lux +++ b/stdlib/source/lux/target/jvm/loader.old.lux @@ -95,11 +95,11 @@ (-> Library java/lang/ClassLoader) (object [] java/lang/ClassLoader [] [] - (java/lang/ClassLoader (findClass {class-name java/lang/String}) java/lang/Class + (java/lang/ClassLoader (findClass self {class-name java/lang/String}) java/lang/Class (let [classes (|> library atom.read io.run)] (case (dictionary.get class-name classes) (#.Some bytecode) - (case (|> _jvm_this + (case (|> self (..define class-name bytecode)) (#error.Success class) (:assume class) |