(command.CommandList
  children: [
    (command.Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (lhs_expr.LhsName name:test_description spids:[13])
          op: Equal
          rhs: {(SQ <'test clone --reference'>)}
          spids: [13]
        )
      ]
      spids: [13]
    )
    (C {(.)} {(./test-lib.sh)})
    (command.Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (lhs_expr.LhsName name:base_dir spids:[23])
          op: Equal
          rhs: 
            {
              (word_part.CommandSubPart
                command_list: (command.CommandList children:[(C {(pwd)})])
                left_token: <Left_CommandSub '$('>
                spids: [24 26]
              )
            }
          spids: [23]
        )
      ]
      spids: [23]
    )
    (command.FuncDef
      name: test_alternate_is_used
      body: 
        (command.BraceGroup
          children: [
            (command.AndOr
              ops: [Op_DAmp Op_DAmp Op_DAmp Op_DAmp Op_DAmp]
              children: [
                (command.Assignment
                  keyword: Assign_None
                  pairs: [
                    (assign_pair
                      lhs: (lhs_expr.LhsName name:alternates_file spids:[37])
                      op: Equal
                      rhs: {(DQ ($ VSub_Number '$1'))}
                      spids: [37]
                    )
                  ]
                  spids: [37]
                )
                (command.Assignment
                  keyword: Assign_None
                  pairs: [
                    (assign_pair
                      lhs: (lhs_expr.LhsName name:working_dir spids:[45])
                      op: Equal
                      rhs: {(DQ ($ VSub_Number '$2'))}
                      spids: [45]
                    )
                  ]
                  spids: [45]
                )
                (C {(test_line_count)} {(Lit_Other '=')} {(1)} {(DQ ($ VSub_Name '$alternates_file'))})
                (command.SimpleCommand
                  words: [{(echo)} {(DQ ('0 objects, 0 kilobytes'))}]
                  redirects: [(redir.Redir op:<Redir_Great '>'> fd:16777215 arg_word:{(expect)})]
                )
                (command.SimpleCommand
                  words: [{(git)} {(-C)} {(DQ ($ VSub_Name '$working_dir'))} {(count-objects)}]
                  redirects: [(redir.Redir op:<Redir_Great '>'> fd:16777215 arg_word:{(actual)})]
                )
                (C {(test_cmp)} {(expect)} {(actual)})
              ]
            )
          ]
          spids: [34]
        )
      spids: [29 33]
    )
    (C {(test_expect_success)} {(SQ <'preparing first repository'>)} 
      {
        (SQ <'\n'> <'\ttest_create_repo A &&\n'> <'\t(\n'> <'\t\tcd A &&\n'> 
          <'\t\techo first >file1 &&\n'> <'\t\tgit add file1 &&\n'> <'\t\tgit commit -m A-initial\n'> <'\t)\n'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'preparing second repository'>)} 
      {
        (SQ <'\n'> <'\tgit clone A B &&\n'> <'\t(\n'> <'\t\tcd B &&\n'> <'\t\techo second >file2 &&\n'> 
          <'\t\tgit add file2 &&\n'> <'\t\tgit commit -m B-addition &&\n'> <'\t\tgit repack -a -d &&\n'> <'\t\tgit prune\n'> <'\t)\n'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'preparing superproject'>)} 
      {
        (SQ <'\n'> <'\ttest_create_repo super &&\n'> <'\t(\n'> <'\t\tcd super &&\n'> 
          <'\t\techo file >file &&\n'> <'\t\tgit add file &&\n'> <'\t\tgit commit -m B-super-initial\n'> <'\t)\n'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'submodule add --reference uses alternates'>)} 
      {
        (SQ <'\n'> <'\t(\n'> <'\t\tcd super &&\n'> 
          <'\t\tgit submodule add --reference ../B "file://$base_dir/A" sub &&\n'> <'\t\tgit commit -m B-super-added &&\n'> <'\t\tgit repack -ad\n'> <'\t) &&\n'> 
          <'\ttest_alternate_is_used super/.git/modules/sub/objects/info/alternates super/sub\n'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'that reference gets used with add'>)} 
      {
        (SQ <'\n'> <'\t(\n'> <'\t\tcd super/sub &&\n'> 
          <'\t\techo "0 objects, 0 kilobytes" >expected &&\n'> <'\t\tgit count-objects >current &&\n'> <'\t\tdiff expected current\n'> <'\t)\n'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'updating superproject keeps alternates'>)} 
      {
        (SQ <'\n'> <'\ttest_when_finished "rm -rf super-clone" &&\n'> 
          <'\tgit clone super super-clone &&\n'> <'\tgit -C super-clone submodule update --init --reference ../B &&\n'> 
          <
'\ttest_alternate_is_used super-clone/.git/modules/sub/objects/info/alternates super-clone/sub\n'
          >
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'submodules use alternates when cloning a superproject'>)} 
      {
        (SQ <'\n'> <'\ttest_when_finished "rm -rf super-clone" &&\n'> 
          <'\tgit clone --reference super --recursive super super-clone &&\n'> <'\t(\n'> <'\t\tcd super-clone &&\n'> <'\t\t# test superproject has alternates setup correctly\n'> 
          <'\t\ttest_alternate_is_used .git/objects/info/alternates . &&\n'> <'\t\t# test submodule has correct setup\n'> 
          <'\t\ttest_alternate_is_used .git/modules/sub/objects/info/alternates sub\n'> <'\t)\n'>
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'missing submodule alternate fails clone and submodule update'>)} 
      {
        (SQ <'\n'> <'\ttest_when_finished "rm -rf super-clone" &&\n'> <'\tgit clone super super2 &&\n'> 
          <'\ttest_must_fail git clone --recursive --reference super2 super2 super-clone &&\n'> <'\t(\n'> <'\t\tcd super-clone &&\n'> <'\t\t# test superproject has alternates setup correctly\n'> 
          <'\t\ttest_alternate_is_used .git/objects/info/alternates . &&\n'> <'\t\t# update of the submodule succeeds\n'> <'\t\ttest_must_fail git submodule update --init &&\n'> 
          <'\t\t# and we have no alternates:\n'> <'\t\ttest_must_fail test_alternate_is_used .git/modules/sub/objects/info/alternates sub &&\n'> 
          <'\t\ttest_must_fail test_path_is_file sub/file1\n'> <'\t)\n'>
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ <'ignoring missing submodule alternates passes clone and submodule update'>)} 
      {
        (SQ <'\n'> <'\ttest_when_finished "rm -rf super-clone" &&\n'> 
          <'\tgit clone --reference-if-able super2 --recursive super2 super-clone &&\n'> <'\t(\n'> <'\t\tcd super-clone &&\n'> <'\t\t# test superproject has alternates setup correctly\n'> 
          <'\t\ttest_alternate_is_used .git/objects/info/alternates . &&\n'> <'\t\t# update of the submodule succeeds\n'> <'\t\tgit submodule update --init &&\n'> 
          <'\t\t# and we have no alternates:\n'> <'\t\ttest_must_fail test_alternate_is_used .git/modules/sub/objects/info/alternates sub &&\n'> 
          <'\t\ttest_path_is_file sub/file1\n'> <'\t)\n'>
        )
      }
    )
    (C {(test_done)})
  ]
)