(command.CommandList
  children: [
    (C {<atf_test_case>} {<default_status>})
    (command.ShFunction
      name: default_status_head
      body: 
        (BraceGroup
          children: [
            (C {<atf_set>} {(DQ <descr>)} {(DQ <'Verifies that test cases get the correct default'>)} 
              {(DQ <'status if they did not provide any'>)}
            )
          ]
        )
    )
    (command.ShFunction
      name: default_status_body
      body: 
        (BraceGroup
          children: [
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:h)
                  op: assign_op.Equal
                  rhs: 
                    {
                      (DQ 
                        (command_sub
                          left_token: <Id.Left_DollarParen '$('>
                          child: (C {<atf_get_srcdir>})
                        ) <'/misc_helpers -s '> (command_sub left_token:<Id.Left_DollarParen '$('> child:(C {<atf_get_srcdir>}))
                      )
                    }
                  spids: [109]
                )
              ]
            )
            (C {<atf_check>} {<-s>} {<eq> <Id.Lit_Colon ':'> <0>} {<-o>} {<ignore>} {<-e>} {<ignore>} 
              {(${ Id.VSub_Name h)} {<tc_pass_true>}
            )
            (C {<atf_check>} {<-s>} {<eq> <Id.Lit_Colon ':'> <1>} {<-o>} {<ignore>} {<-e>} {<ignore>} 
              {(${ Id.VSub_Name h)} {<tc_pass_false>}
            )
            (C {<atf_check>} {<-s>} {<eq> <Id.Lit_Colon ':'> <1>} {<-o>} 
              {<match> <Id.Lit_Colon ':'> (SQ <'failed:.*body.*non-ok exit code'>)} {<-e>} {<ignore>} {(${ Id.VSub_Name h)} {<tc_pass_return_error>}
            )
            (C {<atf_check>} {<-s>} {<eq> <Id.Lit_Colon ':'> <1>} {<-o>} {<ignore>} {<-e>} 
              {<match> <Id.Lit_Colon ':'> (SQ <'An error'>)} {(${ Id.VSub_Name h)} {<tc_fail>}
            )
          ]
        )
    )
    (C {<atf_test_case>} {<missing_body>})
    (command.ShFunction
      name: missing_body_head
      body: 
        (BraceGroup
          children: [
            (C {<atf_set>} {(DQ <descr>)} {(DQ <'Verifies that test cases without a body are reported'>)} 
              {(DQ <'as failed'>)}
            )
          ]
        )
    )
    (command.ShFunction
      name: missing_body_body
      body: 
        (BraceGroup
          children: [
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:h)
                  op: assign_op.Equal
                  rhs: 
                    {
                      (DQ 
                        (command_sub
                          left_token: <Id.Left_DollarParen '$('>
                          child: (C {<atf_get_srcdir>})
                        ) <'/misc_helpers -s '> (command_sub left_token:<Id.Left_DollarParen '$('> child:(C {<atf_get_srcdir>}))
                      )
                    }
                  spids: [261]
                )
              ]
            )
            (C {<atf_check>} {<-s>} {<eq> <Id.Lit_Colon ':'> <1>} {<-o>} {<ignore>} {<-e>} {<ignore>} 
              {(${ Id.VSub_Name h)} {<tc_missing_body>}
            )
          ]
        )
    )
    (command.ShFunction
      name: atf_init_test_cases
      body: 
        (BraceGroup
          children: [
            (C {<atf_add_test_case>} {<default_status>})
            (C {<atf_add_test_case>} {<missing_body>})
          ]
        )
    )
  ]
)