(command.CommandList
  children: [
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:test_description)
          op: assign_op.Equal
          rhs: {(SQ (Token id:Id.Lit_Chars val:'pull can handle submodules' span_id:6))}
          spids: [4]
        )
      ]
    )
    (C {(.)} {(./test-lib.sh)})
    (C {(.)} {(DQ ($ Id.VSub_DollarName '$TEST_DIRECTORY')) (/lib-submodule-update.sh)})
    (command.ShFunction
      name: reset_branch_to_HEAD
      body: 
        (command.BraceGroup
          children: [
            (command.AndOr
              ops: [Id.Op_DAmp Id.Op_DAmp]
              children: [
                (C {(git)} {(branch)} {(-D)} {(DQ ($ Id.VSub_Number '$1'))})
                (C {(git)} {(checkout)} {(-b)} {(DQ ($ Id.VSub_Number '$1'))} {(HEAD)})
                (C {(git)} {(branch)} 
                  {(--set-upstream-to) (Id.Lit_Equals '=') (DQ (origin/) ($ Id.VSub_Number '$1'))} {(DQ ($ Id.VSub_Number '$1'))}
                )
              ]
            )
          ]
        )
    )
    (command.ShFunction
      name: git_pull
      body: 
        (command.BraceGroup
          children: [
            (command.AndOr
              ops: [Id.Op_DAmp]
              children: [
                (C {(reset_branch_to_HEAD)} {(DQ ($ Id.VSub_Number '$1'))})
                (C {(git)} {(pull)})
              ]
            )
          ]
        )
    )
    (C {(test_submodule_switch)} {(DQ (git_pull))})
    (command.ShFunction
      name: git_pull_ff
      body: 
        (command.BraceGroup
          children: [
            (command.AndOr
              ops: [Id.Op_DAmp]
              children: [
                (C {(reset_branch_to_HEAD)} {(DQ ($ Id.VSub_Number '$1'))})
                (C {(git)} {(pull)} {(--ff)})
              ]
            )
          ]
        )
    )
    (C {(test_submodule_switch)} {(DQ (git_pull_ff))})
    (command.ShFunction
      name: git_pull_ff_only
      body: 
        (command.BraceGroup
          children: [
            (command.AndOr
              ops: [Id.Op_DAmp]
              children: [
                (C {(reset_branch_to_HEAD)} {(DQ ($ Id.VSub_Number '$1'))})
                (C {(git)} {(pull)} {(--ff-only)})
              ]
            )
          ]
        )
    )
    (C {(test_submodule_switch)} {(DQ (git_pull_ff_only))})
    (command.ShFunction
      name: git_pull_noff
      body: 
        (command.BraceGroup
          children: [
            (command.AndOr
              ops: [Id.Op_DAmp]
              children: [
                (C {(reset_branch_to_HEAD)} {(DQ ($ Id.VSub_Number '$1'))})
                (C {(git)} {(pull)} {(--no-ff)})
              ]
            )
          ]
        )
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:KNOWN_FAILURE_NOFF_MERGE_DOESNT_CREATE_EMPTY_SUBMODULE_DIR)
          op: assign_op.Equal
          rhs: {(1)}
          spids: [202]
        )
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: 
            (sh_lhs_expr.Name
              name: KNOWN_FAILURE_NOFF_MERGE_ATTEMPTS_TO_MERGE_REMOVED_SUBMODULE_FILES
            )
          op: assign_op.Equal
          rhs: {(1)}
          spids: [205]
        )
      ]
    )
    (C {(test_submodule_switch)} {(DQ (git_pull_noff))})
    (C {(test_done)})
  ]
)