fix : com.debug defined

main.ml

@@ -303,7 +303,7 @@ try
 			) lines) @ !excludes;
 		),"<filename> : don't generate code for classes listed in this file");
 		("-v",Arg.Unit (fun () -> com.verbose <- true),": turn on verbose mode");
-		("-debug", define "debug", ": add debug informations to the compiled code");
+		("-debug", Arg.Unit (fun() -> Common.define com "debug"; com.debug <- true), ": add debug informations to the compiled code");
 		("-prompt", Arg.Unit (fun() -> prompt := true),": prompt on error");
 		("-cmd", Arg.String (fun cmd ->
 			cmds := cmd :: !cmds