anchor.diff:      | Amend
       | [<AltCommandLine("-p")>] Patch
       | [<AltCommandLine("-m")>] Message of msg:string
  -with
  +
       interface IArgParserTemplate with
           member this.Usage =
               match this with
  
positive.code:     | Port of tcp_port:int
      | Log_Level of level:int
      | Detach
  with
      interface IArgParserTemplate with
          member s.Usage =
              match s with
  
negative.code:     | [<AltCommandLine("-v")>] Verbose
      | [<CliPrefix(CliPrefix.None)>] Clean of ParseResults<CleanArgs>
      | [<CliPrefix(CliPrefix.None)>] Commit of ParseResults<CommitArgs>
  
      interface IArgParserTemplate with
          member this.Usage = 
              match this with
  