diff options
Diffstat (limited to 'stdlib/source/lux/compiler/default/phase/extension/analysis/host.jvm.lux')
| -rw-r--r-- | stdlib/source/lux/compiler/default/phase/extension/analysis/host.jvm.lux | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/lux/compiler/default/phase/extension/analysis/host.jvm.lux b/stdlib/source/lux/compiler/default/phase/extension/analysis/host.jvm.lux index 64edb791b..5fac5b1d0 100644 --- a/stdlib/source/lux/compiler/default/phase/extension/analysis/host.jvm.lux +++ b/stdlib/source/lux/compiler/default/phase/extension/analysis/host.jvm.lux @@ -1064,12 +1064,12 @@ ## else (wrap #Fail)))))))] (case (list.search-all pass! candidates) - #.Nil - (////.throw no-candidates [class-name method-name (list.search-all hint! candidates)]) - (#.Cons method #.Nil) (wrap method) + #.Nil + (////.throw no-candidates [class-name method-name (list.search-all hint! candidates)]) + candidates (////.throw too-many-candidates [class-name method-name candidates])))) @@ -1124,12 +1124,12 @@ (if passes? (|>> #Pass) (|>> #Hint)) (constructor-signature constructor))))))] (case (list.search-all pass! candidates) - #.Nil - (////.throw no-candidates [class-name ..constructor-method (list.search-all hint! candidates)]) - (#.Cons constructor #.Nil) (wrap constructor) + #.Nil + (////.throw no-candidates [class-name ..constructor-method (list.search-all hint! candidates)]) + candidates (////.throw too-many-candidates [class-name ..constructor-method candidates])))) |