(command.CommandList
  children: [
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:test_description)
          op: assign_op.Equal
          rhs: {(SQ <'pull can handle submodules'>)}
          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: 
        (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: 
        (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: 
        (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: 
        (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: 
        (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>})
  ]
)