diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-09-02 11:57:25 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-09-02 11:57:25 -0400 |
| commit | 48a39b87c0f2b01c85e1bb78072387e30ab0f235 (patch) | |
| tree | ce3a9139ccc98bb2c4d7034e44138b10c2221545 /src/compiler.sml | |
| parent | b4398c433195b75d5e03d0774b1128fae14e9f41 (diff) | |
Initializing database connection
Diffstat (limited to 'src/compiler.sml')
| -rw-r--r-- | src/compiler.sml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/compiler.sml b/src/compiler.sml index 07bfecc2..93eeebb7 100644 --- a/src/compiler.sml +++ b/src/compiler.sml @@ -417,7 +417,7 @@ val toCjrize = transform cjrize "cjrize" o toMono_opt2 fun compileC {cname, oname, ename} = let val compile = "gcc -O3 -I include -c " ^ cname ^ " -o " ^ oname - val link = "gcc -pthread -O3 clib/urweb.o " ^ oname ^ " clib/driver.o -o " ^ ename + val link = "gcc -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" |