|
@@ -201,6 +201,17 @@ try
|
|
|
Typer.forbidden_packages := ["js"; "flash"];
|
|
|
target := Neko file
|
|
|
),"<file> : compile code to Neko Binary");
|
|
|
+ ("-x", Arg.String (fun file ->
|
|
|
+ check_targets();
|
|
|
+ Typer.forbidden_packages := ["js"; "flash"];
|
|
|
+ target := Neko file;
|
|
|
+ if !main_class = None then begin
|
|
|
+ let cpath = make_path file in
|
|
|
+ main_class := Some cpath;
|
|
|
+ classes := cpath :: !classes
|
|
|
+ end;
|
|
|
+ cmds := ("neko " ^ file) :: !cmds;
|
|
|
+ ),"<file> : shortcut for compiling and executing a neko file");
|
|
|
("-xml",Arg.String (fun file ->
|
|
|
Parser.use_doc := true;
|
|
|
xml_out := Some file
|