Nicolas Cannasse 13 lat temu
rodzic
commit
60d518172b
1 zmienionych plików z 1 dodań i 1 usunięć
  1. 1 1
      genjs.ml

+ 1 - 1
genjs.ml

@@ -438,7 +438,7 @@ and gen_expr ctx e =
 		| _ ->
 			print ctx "($_=";
 			gen_value ctx x;
-			print ctx ",$bind($_,$_.%s)" s)
+			print ctx ",$bind($_,$_.%s))" s)
 	| TTypeExpr t ->
 		spr ctx (ctx.type_accessor t)
 	| TParenthesis e ->