anchor.diff:              expr |> getResults |> List.map (parseResult parser)
   
           member r.TryPostProcessResult (expr : Expr<'Field -> 'Template>) (parser : 'Field -> 'R) =
  -            expr |> tryGetResult |> Option.map (parseResult parser)+            expr |> tryGetResult |> Option.map (parseResult parser)
  
positive.code:         member __.Name = name
  
      /// Sets alternative command line names.
      type AltCommandLinesAttribute (names : string list) = 
          inherit Attribute ()
          member __.Names = names
  
      /// Sets a custom AppSettings key name.
      type CustomAppSettingsAttribute (name : string) = 
  
negative.code:                         | Some attr -> attr.Name
  
                      let altNames = 
                          attrReader.GetAttrs<AltCommandLineAttribute> ()
                          |> List.map (fun attr -> attr.Name)
  
                      let clNames = defName :: altNames 
  
  