Nicolas Cannasse преди 19 години
родител
ревизия
b4ffd2ecf8
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      genjs.ml

+ 1 - 1
genjs.ml

@@ -145,7 +145,7 @@ let rec gen_call ctx e el =
 		spr ctx "(";
 		concat ctx "," (gen_value ctx) el;
 		spr ctx ")"
-	| TCall _ , el ->
+	| TCall (x,_) , el when x.eexpr <> TLocal "__js__" ->
 		spr ctx "(";
 		gen_value ctx e;
 		spr ctx ")";