anchor.diff:      | OptionSetting "#ignore-argstyle" IgnoreArgumentStyle arg.SearchOptions newOpt -> loop client { arg with SearchOptions = newOpt }
       | OptionSetting "#xmldoc" ShowXmlDocument arg newArg -> loop client newArg
       | OptionSetting "#stacktrace" StackTrace arg newArg -> loop client newArg
  +    | "#help" ->
  +      Console.WriteLine(helpMessage)
  +      Console.WriteLine()
  +      loop client arg
       | query ->
         try
           searchAndShowResult client query arg
  
positive.code:   let ShowXmlDocument = { Get = (fun x -> x.ShowXmlDocument); Set = (fun value x -> { x with ShowXmlDocument = value }) }
    let StackTrace = { Get = (fun x -> x.StackTrace); Set = (fun value x -> { x with StackTrace = value }) }
  
    let rec loop (client: FSharpApiSearchClient) arg =
      printf "> "
      match Console.ReadLine().TrimEnd(';') with
  
negative.code:       let client = createClient targets ApiLoader.databaseName
        printfn "Targets the following assemblies."
        client.TargetAssemblies |> List.iter (printfn "  %s")
        printfn "Input query, #help to print help or #q to quit."
        Interactive.loop client args |> ignore
      with
        ex -> showException args ex
  