diff options
author | Eduardo Julian | 2019-09-08 21:17:40 -0400 |
---|---|---|
committer | Eduardo Julian | 2019-09-08 21:17:40 -0400 |
commit | fb7a90d4c56d5e4e726f1e83dc951fa46d36ffdb (patch) | |
tree | 31767c55747bdb92ab88400441cbc2d143b0552f /stdlib/source/lux/target/jvm/type/alias.lux | |
parent | 0e2121dbec4f61dc1d9404deb9dd2b3f401ba4df (diff) |
Some fixes.
Diffstat (limited to 'stdlib/source/lux/target/jvm/type/alias.lux')
-rw-r--r-- | stdlib/source/lux/target/jvm/type/alias.lux | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/stdlib/source/lux/target/jvm/type/alias.lux b/stdlib/source/lux/target/jvm/type/alias.lux index dfa1e4356..9d92d7b6a 100644 --- a/stdlib/source/lux/target/jvm/type/alias.lux +++ b/stdlib/source/lux/target/jvm/type/alias.lux @@ -44,13 +44,11 @@ (def: (class parameter) (-> (Parser (Type Parameter)) (Parser (Type Class))) (|> (do <>.monad - [_ (<t>.this //descriptor.class-prefix) - name //parser.class-name + [name //parser.class-name parameters (|> (<>.some parameter) (<>.after (<t>.this //signature.parameters-start)) (<>.before (<t>.this //signature.parameters-end)) - (<>.default (list))) - _ (<t>.this //descriptor.class-suffix)] + (<>.default (list)))] (wrap (//.class name parameters))) (<>.after (<t>.this //descriptor.class-prefix)) (<>.before (<t>.this //descriptor.class-suffix)))) |