Browse Source

minor cleanup

Nicolas Cannasse 16 năm trước cách đây
mục cha
commit
a91128cd76
2 tập tin đã thay đổi với 0 bổ sung8 xóa
  1. 0 6
      genjs.ml
  2. 0 2
      genneko.ml

+ 0 - 6
genjs.ml

@@ -157,12 +157,6 @@ let rec gen_call ctx e el =
 			concat ctx "," (gen_value ctx) params;
 			spr ctx "])";
 		);
-	| TField (e,s) , el ->
-		gen_value ctx e;
-		spr ctx (field s);
-		spr ctx "(";
-		concat ctx "," (gen_value ctx) el;
-		spr ctx ")"
 	| TCall (x,_) , el when x.eexpr <> TLocal "__js__" ->
 		spr ctx "(";
 		gen_value ctx e;

+ 0 - 2
genneko.ml

@@ -227,8 +227,6 @@ and gen_call ctx p e el =
 			this p;
 			array p (List.map (gen_expr ctx) el)
 		]
-	| TField (e,f) , el ->
-		call p (field p (gen_expr ctx e) f) (List.map (gen_expr ctx) el)
 	| _ , _ ->
 		let e = (match gen_expr ctx e with EFunction _, _ as e -> (EBlock [e],p) | e -> e) in
 		call p e (List.map (gen_expr ctx) el)