Nicolas Cannasse 14 lat temu
rodzic
commit
3c4f829fa6
1 zmienionych plików z 1 dodań i 1 usunięć
  1. 1 1
      genjs.ml

+ 1 - 1
genjs.ml

@@ -739,7 +739,7 @@ let alloc_ctx com =
 	ctx
 
 let gen_single_expr ctx e constr =
-	if constr then gen_constructor ctx e else gen_expr ctx e;
+	if constr then gen_constructor ctx e else gen_value ctx e;
 	let str = Buffer.contents ctx.buf in
 	Buffer.reset ctx.buf;
 	ctx.id_counter <- 0;