|
@@ -653,15 +653,15 @@ let get_config com =
|
|
|
|
|
|
let memory_marker = [|Unix.time()|]
|
|
let memory_marker = [|Unix.time()|]
|
|
|
|
|
|
-let create v args =
|
|
|
|
|
|
+let create version s_version args =
|
|
let m = Type.mk_mono() in
|
|
let m = Type.mk_mono() in
|
|
let defines =
|
|
let defines =
|
|
PMap.add "true" "1" (
|
|
PMap.add "true" "1" (
|
|
- PMap.add "source-header" "Generated by Haxe" (
|
|
|
|
|
|
+ PMap.add "source-header" ("Generated by Haxe " ^ s_version) (
|
|
if !display_default <> DMNone then PMap.add "display" "1" PMap.empty else PMap.empty))
|
|
if !display_default <> DMNone then PMap.add "display" "1" PMap.empty else PMap.empty))
|
|
in
|
|
in
|
|
{
|
|
{
|
|
- version = v;
|
|
|
|
|
|
+ version = version;
|
|
args = args;
|
|
args = args;
|
|
sys_args = args;
|
|
sys_args = args;
|
|
debug = false;
|
|
debug = false;
|