(command.CommandList children: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:test_description) op: assign_op.Equal rhs: {(SQ <'Test git rev-parse with different parent options'>)} spids: [13] ) ] ) (C {<.>} {<'./test-lib.sh'>}) (command.ShFunction name: test_cmp_rev_output body: (BraceGroup children: [ (command.AndOr ops: [Id.Op_DAmp Id.Op_DAmp] children: [ (command.Simple words: [{<git>} {<rev-parse>} {<--verify>} {(DQ ($ Id.VSub_Number '$1'))}] redirects: [(redir op:<Id.Redir_Great '>'> loc:(redir_loc.Fd fd:1) arg:{<expect>})] do_fork: T ) (command.Simple words: [{<eval>} {(DQ ($ Id.VSub_Number '$2'))}] redirects: [(redir op:<Id.Redir_Great '>'> loc:(redir_loc.Fd fd:1) arg:{<actual>})] do_fork: T ) (C {<test_cmp>} {<expect>} {<actual>}) ] ) ] ) ) (C {<test_expect_success>} {(SQ <setup>)} { (SQ <'\n'> <'\ttest_commit start &&\n'> <'\ttest_commit second &&\n'> <'\tgit checkout --orphan tmp &&\n'> <'\ttest_commit start2 &&\n'> <'\tgit checkout master &&\n'> <'\tgit merge -m next --allow-unrelated-histories start2 &&\n'> <'\ttest_commit final &&\n'> <'\n'> <'\ttest_seq 40 |\n'> <'\twhile read i\n'> <'\tdo\n'> <'\t\tgit checkout --orphan "b$i" &&\n'> <'\t\ttest_tick &&\n'> <'\t\tgit commit --allow-empty -m "$i" &&\n'> <'\t\tcommit=$(git rev-parse --verify HEAD) &&\n'> <'\t\tprintf "$commit " >>.git/info/grafts\n'> <'\tdone\n'> ) } ) (C {<test_expect_success>} {(SQ <'start is valid'>)} {(SQ <'\n'> <'\tgit rev-parse start | grep "^[0-9a-f]\\{40\\}$"\n'>)} ) (C {<test_expect_success>} {(SQ <'start^0'>)} {(SQ <'\n'> <'\ttest_cmp_rev_output tags/start "git rev-parse start^0"\n'>)} ) (C {<test_expect_success>} {(SQ <'start^1 not valid'>)} {(SQ <'\n'> <'\ttest_must_fail git rev-parse --verify start^1\n'>)} ) (C {<test_expect_success>} {(SQ <'second^1 = second^'>)} {(SQ <'\n'> <'\ttest_cmp_rev_output second^ "git rev-parse second^1"\n'>)} ) (C {<test_expect_success>} {(SQ <'final^1^1^1'>)} {(SQ <'\n'> <'\ttest_cmp_rev_output start "git rev-parse final^1^1^1"\n'>)} ) (C {<test_expect_success>} {(SQ <'final^1^1^1 = final^^^'>)} {(SQ <'\n'> <'\ttest_cmp_rev_output final^^^ "git rev-parse final^1^1^1"\n'>)} ) (C {<test_expect_success>} {(SQ <'final^1^2'>)} {(SQ <'\n'> <'\ttest_cmp_rev_output start2 "git rev-parse final^1^2"\n'>)} ) (C {<test_expect_success>} {(SQ <'final^1^2 != final^1^1'>)} {(SQ <'\n'> <'\ttest $(git rev-parse final^1^2) != $(git rev-parse final^1^1)\n'>)} ) (C {<test_expect_success>} {(SQ <'final^1^3 not valid'>)} {(SQ <'\n'> <'\ttest_must_fail git rev-parse --verify final^1^3\n'>)} ) (C {<test_expect_success>} {(SQ <'--verify start2^1'>)} {(SQ <'\n'> <'\ttest_must_fail git rev-parse --verify start2^1\n'>)} ) (C {<test_expect_success>} {(SQ <'--verify start2^0'>)} {(SQ <'\n'> <'\tgit rev-parse --verify start2^0\n'>)} ) (C {<test_expect_success>} {(SQ <'final^1^@ = final^1^1 final^1^2'>)} { (SQ <'\n'> <'\tgit rev-parse final^1^1 final^1^2 >expect &&\n'> <'\tgit rev-parse final^1^@ >actual &&\n'> <'\ttest_cmp expect actual\n'> ) } ) (C {<test_expect_success>} {(SQ <'final^1^! = final^1 ^final^1^1 ^final^1^2'>)} { (SQ <'\n'> <'\tgit rev-parse final^1 ^final^1^1 ^final^1^2 >expect &&\n'> <'\tgit rev-parse final^1^! >actual &&\n'> <'\ttest_cmp expect actual\n'> ) } ) (C {<test_expect_success>} {(SQ <'large graft octopus'>)} {(SQ <'\n'> <'\ttest_cmp_rev_output b31 "git rev-parse --verify b1^30"\n'>)} ) (C {<test_expect_success>} {(SQ <'repack for next test'>)} {(SQ <'\n'> <'\tgit repack -a -d\n'>)}) (C {<test_expect_success>} {(SQ <'short SHA-1 works'>)} { (SQ <'\n'> <'\tstart=$(git rev-parse --verify start) &&\n'> <'\ttest_cmp_rev_output start "git rev-parse ${start%?}"\n'> ) } ) (C {<test_expect_success>} {(SQ <'setup for rev^- tests'>)} { (SQ <'\n'> <'\ttest_commit one &&\n'> <'\ttest_commit two &&\n'> <'\ttest_commit three &&\n'> <'\n'> <'\t# Merge in a branch for testing rev^-\n'> <'\tgit checkout -b branch &&\n'> <'\tgit checkout HEAD^^ &&\n'> <'\tgit merge -m merge --no-edit --no-ff branch &&\n'> <'\tgit checkout -b merge\n'> ) } ) (C {<test_expect_success>} {(SQ <'rev-list --count merge^- = merge^..merge'>)} { (SQ <'\n'> <'\tgit rev-list --count merge^..merge >expect &&\n'> <'\techo 3 >actual &&\n'> <'\ttest_cmp expect actual\n'> ) } ) (C {<test_expect_success>} {(SQ <'rev-parse merge^- = merge^..merge'>)} { (SQ <'\n'> <'\tgit rev-parse merge^..merge >expect &&\n'> <'\tgit rev-parse merge^- >actual &&\n'> <'\ttest_cmp expect actual\n'> ) } ) (C {<test_expect_success>} {(SQ <'rev-parse merge^-1 = merge^..merge'>)} { (SQ <'\n'> <'\tgit rev-parse merge^1..merge >expect &&\n'> <'\tgit rev-parse merge^-1 >actual &&\n'> <'\ttest_cmp expect actual\n'> ) } ) (C {<test_expect_success>} {(SQ <'rev-parse merge^-2 = merge^2..merge'>)} { (SQ <'\n'> <'\tgit rev-parse merge^2..merge >expect &&\n'> <'\tgit rev-parse merge^-2 >actual &&\n'> <'\ttest_cmp expect actual\n'> ) } ) (C {<test_expect_success>} {(SQ <'rev-parse merge^-0 (invalid parent)'>)} {(SQ <'\n'> <'\ttest_must_fail git rev-parse merge^-0\n'>)} ) (C {<test_expect_success>} {(SQ <'rev-parse merge^-3 (invalid parent)'>)} {(SQ <'\n'> <'\ttest_must_fail git rev-parse merge^-3\n'>)} ) (C {<test_expect_success>} {(SQ <'rev-parse merge^-^ (garbage after ^-)'>)} {(SQ <'\n'> <'\ttest_must_fail git rev-parse merge^-^\n'>)} ) (C {<test_expect_success>} {(SQ <'rev-parse merge^-1x (garbage after ^-1)'>)} {(SQ <'\n'> <'\ttest_must_fail git rev-parse merge^-1x\n'>)} ) (C {<test_expect_success>} {(SQ <'rev-list merge^- = merge^..merge'>)} { (SQ <'\n'> <'\tgit rev-list merge^..merge >expect &&\n'> <'\tgit rev-list merge^- >actual &&\n'> <'\ttest_cmp expect actual\n'> ) } ) (C {<test_expect_success>} {(SQ <'rev-list merge^-1 = merge^1..merge'>)} { (SQ <'\n'> <'\tgit rev-list merge^1..merge >expect &&\n'> <'\tgit rev-list merge^-1 >actual &&\n'> <'\ttest_cmp expect actual\n'> ) } ) (C {<test_expect_success>} {(SQ <'rev-list merge^-2 = merge^2..merge'>)} { (SQ <'\n'> <'\tgit rev-list merge^2..merge >expect &&\n'> <'\tgit rev-list merge^-2 >actual &&\n'> <'\ttest_cmp expect actual\n'> ) } ) (C {<test_expect_success>} {(SQ <'rev-list merge^-0 (invalid parent)'>)} {(SQ <'\n'> <'\ttest_must_fail git rev-list merge^-0\n'>)} ) (C {<test_expect_success>} {(SQ <'rev-list merge^-3 (invalid parent)'>)} {(SQ <'\n'> <'\ttest_must_fail git rev-list merge^-3\n'>)} ) (C {<test_expect_success>} {(SQ <'rev-list merge^-^ (garbage after ^-)'>)} {(SQ <'\n'> <'\ttest_must_fail git rev-list merge^-^\n'>)} ) (C {<test_expect_success>} {(SQ <'rev-list merge^-1x (garbage after ^-1)'>)} {(SQ <'\n'> <'\ttest_must_fail git rev-list merge^-1x\n'>)} ) (C {<test_done>}) ] )