diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2009-06-23 14:05:12 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2009-06-23 14:05:12 -0400 |
| commit | 3602f46fee1c01d173177298abd3caa58e3d946b (patch) | |
| tree | e623aac5c0b1237fc0e7d16fa0749b114d18aa6e /src/compiler.sml | |
| parent | c701f11b2ee105af75dbeb4baaf0f2c35bb417e2 (diff) | |
Factor out common request functionality, in preparation for supporting different protocols
Diffstat (limited to 'src/compiler.sml')
| -rw-r--r-- | src/compiler.sml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/compiler.sml b/src/compiler.sml index 4209426f..c7c2f65e 100644 --- a/src/compiler.sml +++ b/src/compiler.sml @@ -884,11 +884,13 @@ val toSqlify = transform sqlify "sqlify" o toMono_opt2 fun compileC {cname, oname, ename, libs, profile, debug, link = link'} = let val urweb_o = clibFile "urweb.o" + val request_o = clibFile "request.o" val driver_o = clibFile "driver.o" val compile = "gcc " ^ Config.gccArgs ^ " -Wstrict-prototypes -Werror -O3 -I " ^ Config.includ ^ " -c " ^ cname ^ " -o " ^ oname - val link = "gcc -Werror -O3 -lm -lmhash -pthread " ^ libs ^ " " ^ urweb_o ^ " " ^ oname ^ " " ^ driver_o ^ " -o " ^ ename + val link = "gcc -Werror -O3 -lm -lmhash -pthread " ^ libs ^ " " ^ urweb_o ^ " " ^ oname + ^ " " ^ request_o ^ " " ^ driver_o ^ " -o " ^ ename val (compile, link) = if profile then |