(Pipeline
  children: [
    (C {(svn)} {(status)} {(-q)} {(DQ ($ VSub_At '$@'))})
    (C {(grep)} {(SQ <'^[GM]'>)})
    (C {(cut)} {(-c)} {(8-)})
    (WhileUntil
      keyword: <KW_While while>
      cond: [(Sentence child:(C {(read)} {(file)}) terminator:<Op_Semi ';'>)]
      body: (DoGroup children:[(C {(meld)} {(DQ ($ VSub_Name '$file'))})] spids:[86 95])
    )
  ]
  negated: F
)