anchor.diff:          inputs |> List.map (fun s -> writer.Write s) |> ignore
           writer.Close()
       let stdout = p.StandardOutput.ReadToEnd()
  +    let prompt = if stdout = "" then
  +                    ""
  +                 else
  +                    "-> " + stdout
       if config.Pretty then
  -        stdout |> pretty_print |> printfn "-> %s"
  +        prompt |> pretty_print |> printf "%s"
       else
  -        stdout |> printfn "-> %s"
  +        prompt |> printf "%s"
       p.Close()
       stdout
   
  
positive.code:             "Groonga database does not exist specified path: " + config.DBPath |> printfn "%s"
              exit 1
  
          let prompt = Path.GetFileNameWithoutExtension config.DBPath |> sprintf "grnline.fs(%s)> "
          let mutable inputs: string list = []
          let mutable continueLooping = true
          while continueLooping do
  
negative.code:             let result = start_groonga config inputs
              if result = "" then
                  inputs <- List.append inputs ["\n"]
                  prompt <- ">> "
              if not <| (result = "") then
                  inputs <- []
                  prompt <- prompt_default
  
      with
         | :? System.ArgumentException -> usage |> printfn "Invalid argument(s) specified. See usage: %s"
  