anchor.diff:  let check_dbpath (config: Config) =
       System.IO.File.Exists <| config.DBPath
   
  -let start_groonga (config: Config) (line: string) =
  +let start_groonga (config: Config) (inputs: string list) =
       let encoding = config.DBEncoding |> Encoding.GetEncoding
       let psInfo = new System.Diagnostics.ProcessStartInfo(config.Path)
       psInfo.UseShellExecute <- false
  
positive.code:             exit 1
  
          let prompt = Path.GetFileNameWithoutExtension config.DBPath |> sprintf "grnline.fs(%s)> "
          let mutable continueLooping = true
          while continueLooping do
              prompt |> printf "%s"
              let tr = System.Console.In
  
              let line = tr.ReadLine()
              if line.Equals <| "quit" then
                  printf "Bye!"
                  exit 0
              start_groonga config line
  
      with
         | :? System.ArgumentException -> usage |> printfn "Invalid argument(s) specified. See usage: %s"
  
negative.code:     else
          stdout |> printfn "-> %s"
      p.Close()
      stdout
  
  [<EntryPoint>]
  let main argv =
  