removed ODump

src/generators/genhl.ml

@@ -1710,9 +1710,6 @@ and eval_expr ctx e =
 			let r = alloc_tmp ctx HI32 in
 			op ctx (OGetTID (r,eval_to ctx v HType));
 			r
-		| "$dump", [v] ->
-			op ctx (ODump (eval_expr ctx v));
-			alloc_tmp ctx HVoid
 		| "$resources", [] ->
 			let tdef = (try List.find (fun t -> (t_infos t).mt_path = (["haxe";"_Resource"],"ResourceContent")) ctx.com.types with Not_found -> assert false) in
 			let t = class_type ctx (match tdef with TClassDecl c -> c | _ -> assert false) [] false in

src/generators/hl2c.ml

@@ -1154,8 +1154,6 @@ let write_c version file (code:code) =
 			| OEndTrap b ->
 				sexpr "hl_endtrap(trap$%d)" (!trap_depth - 1);
 				if b then decr trap_depth;
-			| ODump r ->
-				todo()
 			| ONop _ ->
 				()
 		) f.code;

src/generators/hlcode.ml

@@ -195,7 +195,6 @@ type opcode =
 	| OEnumField of reg * reg * field index * int
 	| OSetEnumField of reg * int * reg
 	(* misc *)
-	| ODump of reg
 	| ONop of string
 
 type fundecl = {
@@ -563,7 +562,6 @@ let ostr fstr o =
 	| ONullCheck r -> Printf.sprintf "nullcheck %d" r
 	| OTrap (r,i) -> Printf.sprintf "trap %d, %d" r i
 	| OEndTrap b -> Printf.sprintf "endtrap %b" b
-	| ODump r -> Printf.sprintf "dump %d" r
 	| ONop s -> if s = "" then "nop" else "nop " ^ s
 
 let fundecl_name f = if snd f.fpath = "" then "fun$" ^ (string_of_int f.findex) else (fst f.fpath) ^ "." ^ (snd f.fpath)

src/generators/hlinterp.ml

@@ -1048,8 +1048,6 @@ let interp code =
 				traps := (r,target) :: !traps
 			| OEndTrap _ ->
 				traps := List.tl !traps
-			| ODump r ->
-				print_endline (vstr_d (get r));
 			| ONop _ ->
 				()
 			);
@@ -2214,8 +2212,6 @@ let check code =
 				can_jump idx
 			| OEndTrap _ ->
 				()
-			| ODump r ->
-				ignore(rtype r);
 			| ONop _ ->
 				()
 		) f.code
@@ -2610,7 +2606,7 @@ let make_spec (code:code) (f:fundecl) =
 			| OEnumIndex (d,r) -> args.(d) <- SConv ("index",args.(r))
 			| OEnumField (d,r,fid,cid) -> args.(d) <- SEnumField (args.(r),fid,cid)
 			| OSetEnumField (e,fid,r) -> semit (SSetEnumField (args.(e),fid,args.(r)))
-			| ODump _ | ONop _ -> ()
+			| ONop _ -> ()
 		done;
 		Hashtbl.add block_args b.bstart args
 	in

src/generators/hlopt.ml

@@ -151,8 +151,6 @@ let opcode_fx frw op =
 		write d
 	| OSetEnumField (a,_,b) ->
 		read a; read b
-	| ODump r ->
-		read r
 	| ONop _ ->
 		()
 
@@ -422,8 +420,6 @@ let opcode_map read write op =
 		OMakeEnum (write d, e, rl)
 	| OSetEnumField (a,f,b) ->
 		OSetEnumField (read a, f, read b)
-	| ODump r ->
-		ODump (read r)
 	| ONop _ ->
 		op