on master help sign in
Switch order of args for main values
4bae628Evan Czaplicki
src/Generate/JavaScript/Expression.hs+1−1
@@ -224,7 +224,7 @@ generateCode expr =
224 generateCode (Data "no-flags" [body])
224 generateCode (Data "no-flags" [body])
225
225
226 Expr.Flags tipe ->
226 Expr.Flags tipe ->
227− generateCode (Data "flags" [Foreign.decode tipe, body])
227+ generateCode (Data "flags" [body, Foreign.decode tipe])
228
228
229 GLShader _uid src _tipe ->
229 GLShader _uid src _tipe ->
230 jsExpr $ ObjectLit () [(PropString () "src", Literal.literal (L.Str src))]
230 jsExpr $ ObjectLit () [(PropString () "src", Literal.literal (L.Str src))]