on master help sign in
Generate proper code to let () out ports
c8a6b0fEvan Czaplicki
compiler/src/Optimize/Port.hs+1−1
@@ -38,7 +38,7 @@ toEncoder tipe =
38 error "toEncoder: type variable"
38 error "toEncoder: type variable"
39
39
40 Can.TUnit ->
40 Can.TUnit ->
41− encode "null"
41+ Opt.Function [N.dollar] <$> encode "null"
42
42
43 Can.TTuple a b c ->
43 Can.TTuple a b c ->
44 encodeTuple a b c
44 encodeTuple a b c