소스 검색

[cs] minor

Caue Waneck 13 년 전
부모
커밋
08b79df5a8
2개의 변경된 파일2개의 추가작업 그리고 2개의 파일을 삭제
  1. 1 1
      gencommon.ml
  2. 1 1
      gencs.ml

+ 1 - 1
gencommon.ml

@@ -4364,7 +4364,7 @@ struct
       | TMono _, _
       | TDynamic _, _
       | TAnon _, _ when gen.gneeds_box real_from_t -> 
-        mk_cast to_t (mk_paren e)
+        mk_cast to_t e
       | TMono _, _
       | TDynamic _, _ -> e
       | _, TMono _

+ 1 - 1
gencs.ml

@@ -1248,7 +1248,7 @@ let configure gen =
       trace (debug_expr e);
       {
         eexpr = TCall({
-            eexpr = TField(e, "toDynamic");
+            eexpr = TField(mk_paren e, "toDynamic");
             etype = TFun([], t_dynamic);
             epos = e.epos
           }, []);