Mercurial > urweb

diff src/settings.sml @ 865:ebefb0609ac3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Move http protocol into its own file
author Adam Chlipala <adamc@hcoop.net>
date Sun, 28 Jun 2009 11:49:04 -0400
parents 60240acd15b9
children 03e7f111fe99
line wrap: on
line diff
--- a/src/settings.sml	Sat Jun 27 19:07:28 2009 -0400
+++ b/src/settings.sml	Sun Jun 28 11:49:04 2009 -0400
@@ -261,13 +261,9 @@
 fun clibFile s = OS.Path.joinDirFile {dir = Config.libC,
                                       file = s}
 
-val http = {name = "http",
-            link = clibFile "request.o" ^ " " ^ clibFile "queue.o" ^ " " ^ clibFile "http.o",
-            persistent = true}
-
-val () = addProtocol http
-
-val curProto = ref http
+val curProto = ref {name = "",
+                    link = "",
+                    persistent = false}
 fun setProtocol name =
     case getProtocol name of
         NONE => raise Fail ("Unknown protocol " ^ name)