diff options
| author | Eduardo Julian | 2020-06-23 03:02:15 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2020-06-23 03:02:15 -0400 |
| commit | c3eab65e3f107f7acdc0c0354770f9b8fbd92c4f (patch) | |
| tree | e7c3221383b6dfc3d7f97ea5b4910193566d3806 /lux-jvm | |
| parent | a8dacf2bd2b19e50888d3e5f293792d0b88afff7 (diff) | |
Bug fixes.
Diffstat (limited to 'lux-jvm')
| -rw-r--r-- | lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux b/lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux index c25151bcf..31846598e 100644 --- a/lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux +++ b/lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux @@ -804,8 +804,9 @@ arguments (<s>.tuple (<>.some ..argument)) returnT ..return exceptionsT (<s>.tuple (<>.some ..class)) - [environment body] (<s>.function 1 - (<s>.tuple <s>.any))] + [environment _ _ body] (<s>.function 1 + (<s>.loop (<>.exactly 0 <s>.any) + (<s>.tuple <s>.any)))] (wrap [environment [ownerT name strict-fp? annotations vars |