Explorar el Código

generate interface type (for instanceof).

Nicolas Cannasse hace 20 años
padre
commit
e04810d15c
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  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