Commit 81c59c75 authored by mthomas's avatar mthomas
Browse files

[project @ 2004-09-16 01:39:24 by mthomas]

On Windows default to main.exe instead of a.out.
parent daf67985
......@@ -994,7 +994,11 @@ staticLink o_files dep_packages = do
-- dependencies, and eliminating duplicates.
o_file <- readIORef v_Output_file
#if defined(mingw32_HOST_OS)
let output_fn = case o_file of { Just s -> s; Nothing -> "main.exe"; }
#else
let output_fn = case o_file of { Just s -> s; Nothing -> "a.out"; }
#endif
pkg_lib_paths <- getPackageLibraryPath dep_packages
let pkg_lib_path_opts = map ("-L"++) pkg_lib_paths
......
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