(command.CommandList
  children: [
    (command.Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (lhs_expr.LhsName name:test_description)
          op: Equal
          rhs: {(SQ <'git apply handling submodules'>)}
        )
      ]
    )
    (C {(.)} {(./test-lib.sh)})
    (C {(.)} {(DQ ($ VSub_DollarName '$TEST_DIRECTORY')) (/lib-submodule-update.sh)})
    (command.FuncDef
      name: apply_index
      body: 
        (command.BraceGroup
          children: [
            (command.Pipeline
              children: [
                (C {(git)} {(diff)} {(--ignore-submodules) (Lit_Other '=') (dirty)} 
                  {(DQ (..) ($ VSub_Number '$1'))}
                )
                (C {(git)} {(apply)} {(--index)} {(-)})
              ]
              negated: F
            )
          ]
        )
    )
    (C {(test_submodule_switch)} {(DQ (apply_index))})
    (command.FuncDef
      name: apply_3way
      body: 
        (command.BraceGroup
          children: [
            (command.Pipeline
              children: [
                (C {(git)} {(diff)} {(--ignore-submodules) (Lit_Other '=') (dirty)} 
                  {(DQ (..) ($ VSub_Number '$1'))}
                )
                (C {(git)} {(apply)} {(--3way)} {(-)})
              ]
              negated: F
            )
          ]
        )
    )
    (C {(test_submodule_switch)} {(DQ (apply_3way))})
    (C {(test_done)})
  ]
)