Procházet zdrojové kódy

generate interface type (for instanceof).

Nicolas Cannasse před 20 roky
rodič
revize
e04810d15c
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  1. 1 1
      genswf8.ml

+ 1 - 1
genswf8.ml

@@ -1081,7 +1081,7 @@ let gen_path ctx (p,t) is_extern =
 let gen_type_def ctx t tdef =
 	match tdef with
 	| TClassDecl c ->
-		if c.cl_extern || c.cl_interface then 
+		if c.cl_extern then
 			()
 		else
 		let id = gen_type ctx t false in