Commit 9898358f authored by Clemens Fruhwirth's avatar Clemens Fruhwirth

Change suffix for dyn. linked executables from _real to .dyn

parent 65d029ea
......@@ -1188,8 +1188,8 @@ runPhase_MoveBinary dflags input_fn dep_packages
Wrapped wrapmode ->
do
let (o_base, o_ext) = splitExtension input_fn
let wrapped_executable | o_ext == "exe" = (o_base ++ "_real") <.> o_ext
| otherwise = input_fn ++ "_real"
let wrapped_executable | o_ext == "exe" = (o_base ++ ".dyn") <.> o_ext
| otherwise = input_fn ++ ".dyn"
behaviour <- wrapper_behaviour dflags wrapmode dep_packages
-- THINKME isn't this possible to do a bit nicer?
......
......@@ -16,7 +16,7 @@
/* All defining behavior string */
char behaviour[]=BEHAVIOUR;
#define REAL_EXT "_real"
#define REAL_EXT ".dyn"
#define REAL_EXT_S (sizeof(REAL_EXT)-1)
void *smalloc(size_t size);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment