(command.CommandList
  children: [
    (C {<read>} {<line>})
    (C {<test>} {(DQ ($ Id.VSub_DollarName '$line'))} {<Id.Lit_Equals '='>} {(DQ <'Halle Potta'>)})
  ]
)