(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:test_description)
          op: Equal
          rhs: {(SQ <"git p4 relative chdir">)}
          spids: [4]
        )
      ]
      spids: [4]
    )
    (C {(.)} {(./lib-git-p4.sh)})
    (C {(test_expect_success)} {(SQ <"start p4d">)} {(SQ <"\n"> <"\tstart_p4d\n">)})
    (C {(test_expect_success)} {(SQ <"init depot">)} 
      {
        (SQ <"\n"> <"\t(\n"> <"\t\tcd \"$cli\" &&\n"> <"\t\techo file1 >file1 &&\n"> 
          <"\t\tp4 add file1 &&\n"> <"\t\tp4 submit -d \"change 1\"\n"> <"\t)\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"P4CONFIG and absolute dir clone">)} 
      {
        (SQ <"\n"> <"\tprintf \"P4PORT=$P4PORT\\nP4CLIENT=$P4CLIENT\\n\" >p4config &&\n"> 
          <"\ttest_when_finished \"rm p4config\" &&\n"> <"\ttest_when_finished cleanup_git &&\n"> <"\t(\n"> <"\t\tP4CONFIG=p4config && export P4CONFIG &&\n"> 
          <"\t\tsane_unset P4PORT P4CLIENT &&\n"> <"\t\tgit p4 clone --verbose --dest=\"$git\" //depot\n"> <"\t)\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"P4CONFIG and relative dir clone">)} 
      {
        (SQ <"\n"> <"\tprintf \"P4PORT=$P4PORT\\nP4CLIENT=$P4CLIENT\\n\" >p4config &&\n"> 
          <"\ttest_when_finished \"rm p4config\" &&\n"> <"\ttest_when_finished cleanup_git &&\n"> <"\t(\n"> <"\t\tP4CONFIG=p4config && export P4CONFIG &&\n"> 
          <"\t\tsane_unset P4PORT P4CLIENT &&\n"> <"\t\tgit p4 clone --verbose --dest=\"git\" //depot\n"> <"\t)\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"p4 client root would be relative due to clone --dest">)} 
      {
        (SQ <"\n"> <"\ttest_when_finished cleanup_git &&\n"> <"\t(\n"> 
          <"\t\techo P4PORT=$P4PORT >git/.p4config &&\n"> <"\t\tP4CONFIG=.p4config &&\n"> <"\t\texport P4CONFIG &&\n"> <"\t\tunset P4PORT &&\n"> 
          <"\t\tgit p4 clone --dest=\"git\" //depot\n"> <"\t)\n">
        )
      }
    )
    (C {(test_expect_success)} {(SYMLINKS)} {(SQ <"p4 client root symlink should stay symbolic">)} 
      {
        (SQ <"\n"> <"\tphysical=\"$TRASH_DIRECTORY/physical\" &&\n"> 
          <"\tsymbolic=\"$TRASH_DIRECTORY/symbolic\" &&\n"> <"\ttest_when_finished \"rm -rf \\\"$physical\\\"\" &&\n"> 
          <"\ttest_when_finished \"rm \\\"$symbolic\\\"\" &&\n"> <"\tmkdir -p \"$physical\" &&\n"> <"\tln -s \"$physical\" \"$symbolic\" &&\n"> 
          <"\ttest_when_finished cleanup_git &&\n"> <"\t(\n"> <"\t\tP4CLIENT=client-sym &&\n"> <"\t\tp4 client -i <<-EOF &&\n"> <"\t\tClient: $P4CLIENT\n"> 
          <"\t\tDescription: $P4CLIENT\n"> <"\t\tRoot: $symbolic\n"> <"\t\tLineEnd: unix\n"> <"\t\tView: //depot/... //$P4CLIENT/...\n"> 
          <"\t\tEOF\n"> <"\t\tgit p4 clone --dest=\"$git\" //depot &&\n"> <"\t\tcd \"$git\" &&\n"> 
          <"\t\ttest_commit file2 &&\n"> <"\t\tgit config git-p4.skipSubmitEdit true &&\n"> <"\t\tgit p4 submit\n"> <"\t)\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"kill p4d">)} {(SQ <"\n"> <"\tkill_p4d\n">)})
    (C {(test_done)})
  ]
)