(command.Pipeline
  children: [
    (C {<svn>} {<status>} {<-q>} {(DQ ($ Id.VSub_At '$@'))})
    (C {<grep>} {(SQ <'^[GM]'>)})
    (C {<cut>} {<-c>} {<8->})
    (command.WhileUntil
      keyword: <Id.KW_While while>
      cond: 
        (condition.Shell
          commands: [(command.Sentence child:(C {<read>} {<file>}) terminator:<Id.Op_Semi _>)]
        )
      body: (command.DoGroup children:[(C {<meld>} {(DQ ($ Id.VSub_DollarName '$file'))})])
    )
  ]
  negated: F
)