(command.CommandList children: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:test_description) op: assign_op.Equal rhs: { (SQ <'\n'> <'Miscellaneous tests for git ls-tree.\n'> <'\n'> <'\t 1. git ls-tree fails in presence of tree damage.\n'> <'\n'> ) } spids: [4] ) ] ) (C {<.>} {<'./test-lib.sh'>}) (C {<test_expect_success>} {(SQ <setup>)} { (SQ <'\n'> <'\tmkdir a &&\n'> <'\ttouch a/one &&\n'> <'\tgit add a/one &&\n'> <'\tgit commit -m test\n'> ) } ) (C {<test_expect_success>} {(SQ <'ls-tree fails with non-zero exit code on broken tree'>)} { (SQ <'\n'> <'\trm -f .git/objects/5f/cffbd6e4c5c5b8d81f5e9314b20e338e3ffff5 &&\n'> <'\ttest_must_fail git ls-tree -r HEAD\n'> ) } ) (C {<test_done>}) ] )