diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-09-07 10:52:51 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-09-07 10:52:51 -0400 |
| commit | 42c284b9204ef5dfc249cc7273ff2eaa9304e9e6 (patch) | |
| tree | 1a629ae9f99d61753dfa8da8d80865550b7bf8fa | |
| parent | e5636bb18cfe24bb8aa8dd0df64dfe781622371c (diff) | |
Ask GCC to strip executables
| -rw-r--r-- | src/compiler.sml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/compiler.sml b/src/compiler.sml index 773cf578..09080809 100644 --- a/src/compiler.sml +++ b/src/compiler.sml @@ -467,8 +467,8 @@ val toSqlify = transform sqlify "sqlify" o toMono_opt2 fun compileC {cname, oname, ename} = let - val compile = "gcc -O3 -I include -c " ^ cname ^ " -o " ^ oname - val link = "gcc -O3 -pthread -lpq clib/urweb.o " ^ oname ^ " clib/driver.o -o " ^ ename + val compile = "gcc -s -O3 -I include -c " ^ cname ^ " -o " ^ oname + val link = "gcc -s -O3 -pthread -lpq clib/urweb.o " ^ oname ^ " clib/driver.o -o " ^ ename in if not (OS.Process.isSuccess (OS.Process.system compile)) then print "C compilation failed\n" |