(command.CommandList
  children: [
    (C {<atf_test_case>} {<check_grow>})
    (command.ShFunction
      name: check_grow_head
      body: 
        (BraceGroup
          children: [
            (C {<atf_set>} {(DQ <descr>)} {(DQ <'Tests check for room to grow in image'>)})
            (C {<atf_set>} {(DQ <require.user>)} {(DQ <root>)})
          ]
        )
    )
    (command.ShFunction
      name: check_grow_body
      body: 
        (BraceGroup
          children: [
            (C {<echo>} {(DQ <'***resize_ffs check grow test'>)})
            (C {<atf_check>} {<-o>} {<ignore>} {<-e>} {<ignore>} {<newfs>} {<-V1>} {<-s>} {<6144>} {<-F>} 
              {(${ Id.VSub_Name IMG)}
            )
            (command.Simple
              words: [{<dd>} {<Id.Lit_VarLike 'if='> <'/dev/zero'>} {<Id.Lit_VarLike 'count='> <2048>}]
              redirects: [
                (redir
                  op: <Id.Redir_DGreat '>>'>
                  loc: (redir_loc.Fd fd:1)
                  arg: {(${ Id.VSub_Name IMG)}
                )
              ]
              do_fork: T
            )
            (C {<atf_check>} {<-s>} {<Id.ControlFlow_Exit exit> <Id.Lit_Colon ':'> <0>} {<-o>} 
              {<match> <Id.Lit_Colon ':'> (DQ <'newsize: 8192 oldsize: 6144'>)} {<resize_ffs>} {<-v>} {<-c>} {<-y>} {(${ Id.VSub_Name IMG)}
            )
            (C {<atf_check>} {<-s>} {<Id.ControlFlow_Exit exit> <Id.Lit_Colon ':'> <0>} {<-o>} {<ignore>} 
              {<resize_ffs>} {<-y>} {(${ Id.VSub_Name IMG)}
            )
            (C {<atf_check>} {<-s>} {<Id.ControlFlow_Exit exit> <Id.Lit_Colon ':'> <0>} {<-o>} {<ignore>} 
              {<fsck_ffs>} {<-f>} {<-n>} {<-F>} {(${ Id.VSub_Name IMG)}
            )
            (C {<atf_check>} {<-s>} {<Id.ControlFlow_Exit exit> <Id.Lit_Colon ':'> <1>} {<-o>} 
              {<match> <Id.Lit_Colon ':'> (DQ <'already 8192 blocks'>)} {<resize_ffs>} {<-v>} {<-c>} {<-y>} {(${ Id.VSub_Name IMG)}
            )
          ]
        )
    )
    (command.ShFunction
      name: atf_init_test_cases
      body: (BraceGroup children:[(C {<setupvars>}) (C {<atf_add_test_case>} {<check_grow>})])
    )
  ]
)