anchor.diff:      
       let mutable server = Unchecked.defaultof<IDisposable>
       let mutable thread = Unchecked.defaultof<_>
  -        
  -    member this.Configuration (app : IAppBuilder) = app.Run(handler)
  -            
  +    member this.Configuration(app : IAppBuilder) = app.Run(handler)
       interface IServer with
           
           member this.Start() = 
  
positive.code:                     server <- Microsoft.Owin.Hosting.WebApp.Start(startOptions, this.Configuration)
                      Console.ReadKey() |> ignore
                  with e -> printfn "%A" e
  
              try 
                  thread <- Task.Factory.StartNew(startServer, TaskCreationOptions.LongRunning)
              with e -> ()
  
negative.code:                 match httpModule.TryGetValue(owin.Request.Method.ToLowerInvariant() + "-" + lookupValue) with
                  | (true, x) -> x.Process owin
                  | _ -> owin |> BAD_REQUEST MessageConstants.HTTP_NOT_SUPPORTED
              
              let matchSubModules (x : int, owin : IOwinContext) = 
                  match x with
                  | 3 -> getModule ("/" + owin.Request.Uri.Segments.[1] + ":id") owin
                  | 4 -> 
                      getModule 
                          ("/" + owin.Request.Uri.Segments.[1] + ":id/" 
                           + HttpHelpers.RemoveTrailingSlash owin.Request.Uri.Segments.[3]) owin
                  | 5 -> 
                      getModule ("/" + owin.Request.Uri.Segments.[1] + ":id/" + owin.Request.Uri.Segments.[3] + ":id") 
                          owin
                  | _ -> owin |> BAD_REQUEST MessageConstants.HTTP_NOT_SUPPORTED
              
              try 
                  match owin.Request.Uri.Segments.Length with
                  // Server root
  