Sfoglia il codice sorgente

generate interface type (for instanceof).

Nicolas Cannasse 20 anni fa
parent
commit
e04810d15c
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  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