@@ -43,9 +43,6 @@ moduleToJs (Module pname@(ProperName name) decls) env =
4343 ]
4444
4545declToJs :: ModuleName -> Declaration -> Environment -> Maybe [JS]
46−declToJs mp (ValueDeclaration ident _ _ (Abs args ret)) e =
47− Just [ JSFunction (Just ident) args (JSBlock [JSReturn (valueToJs mp e ret)]),
48− setProperty (identToJs ident) (JSVar ident) mp ]
4946declToJs mp (ValueDeclaration ident _ _ val) e =
5047 Just [ JSVariableIntroduction ident (Just (valueToJs mp e val)),
5148 setProperty (identToJs ident) (JSVar ident) mp ]