(CommandList
  children: [
    (C {(echo)} {(SQ <'--- readproctitle insists on an argument'>)})
    (Sentence
      child: 
        (SimpleCommand
          words: [{(readproctitle)}]
          redirects: [(Redir op_id:Redir_Less fd:16777215 arg_word:{(/dev/null)} spids:[16])]
        )
      terminator: <Op_Semi ';'>
    )
    (C {(echo)} {($ VSub_QMark '$?')})
    (C {(echo)} {(SQ <'--- readproctitle insists on last argument being at least five bytes'>)})
    (Sentence
      child: 
        (SimpleCommand
          words: [{(readproctitle)} {(..........)} {(four)}]
          redirects: [(Redir op_id:Redir_Less fd:16777215 arg_word:{(/dev/null)} spids:[38])]
        )
      terminator: <Op_Semi ';'>
    )
    (C {(echo)} {($ VSub_QMark '$?')})
  ]
)