diff options
| author | Eduardo Julian | 2018-05-07 21:57:45 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2018-05-07 21:57:45 -0400 |
| commit | 10655fdd7bc6c88a417ec33237ae992d79cf3dd6 (patch) | |
| tree | 971dd8807707d1ec333cb5602af0ed1fbcaa9d54 | |
| parent | 07c70ad15ba4a8c9b00773a0a14eade28fe06569 (diff) | |
- Went back to the old way of loading classes...
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/lux/host.jvm.lux | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/stdlib/source/lux/host.jvm.lux b/stdlib/source/lux/host.jvm.lux index fea1a108e..2315ffd2c 100644 --- a/stdlib/source/lux/host.jvm.lux +++ b/stdlib/source/lux/host.jvm.lux @@ -1840,9 +1840,8 @@ ("jvm invokevirtual:java.lang.Class:isInterface:" class)) (def: (load-class class-name) - (-> Text (Either Text (primitive "java.lang.Class" [(Ex [a] a)]))) - (let [system-class-loader ("jvm invokestatic:java.lang.ClassLoader:getSystemClassLoader:")] - (try ("jvm invokestatic:java.lang.Class:forName:java.lang.String,boolean,java.lang.ClassLoader" class-name false system-class-loader)))) + (-> Text (Either Text (primitive "java.lang.Class" [Top]))) + (try ("jvm invokestatic:java.lang.Class:forName:java.lang.String" class-name))) (def: (class-kind [class-name _]) (-> Class-Declaration (Meta Class-Kind)) |