Explorar o código

[cs] Type parameters for interfaces handling

Caue Waneck %!s(int64=13) %!d(string=hai) anos
pai
achega
eb19a42935
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      gencommon.ml

+ 1 - 1
gencommon.ml

@@ -3881,7 +3881,7 @@ struct
         
         let rec run md =
           match md with 
-            | TClassDecl ({ cl_extern = false; cl_interface = false; cl_types = hd :: tl } as cl) when set_hxgeneric gen md ->
+            | TClassDecl ({ cl_extern = false; cl_types = hd :: tl } as cl) when set_hxgeneric gen md ->
               let iface = mk_class cl.cl_module cl.cl_path cl.cl_pos in
               iface.cl_array_access <- Option.map (apply_params (cl.cl_types) (List.map (fun _ -> t_dynamic) cl.cl_types)) cl.cl_array_access;
               iface.cl_module <- cl.cl_module;