(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "interaction with P4 case-folding">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./lib-git-p4.sh]})
  (If
    (Com {[LIT_CHARS test_have_prereq]} {[LIT_CHARS CASE_INSENSITIVE_FS]})
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('skip_all', {[SQ <LIT_CHARS "skipping P4 case-folding tests; case insensitive file system detected">]})])
      (Com {[LIT_CHARS test_done]})
    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "start p4d with case folding enabled">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tstart_p4d -C1\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Create a repo, name is lowercase">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tclient_view \"//depot/... //client/...\" &&\n"> <LIT_CHARS "\t\tcd \"$cli\" &&\n"> <LIT_CHARS "\t\tmkdir -p lc UC &&\n"> <LIT_CHARS "\t\t>lc/file.txt && >UC/file.txt &&\n"> <LIT_CHARS "\t\tp4 add lc/file.txt UC/file.txt &&\n"> <LIT_CHARS "\t\tp4 submit -d \"Add initial lc and UC repos\"\n"> <LIT_CHARS "\t)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Check p4 is in case-folding mode">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd \"$cli\" &&\n"> <LIT_CHARS "\t\t>lc/FILE.TXT &&\n"> <LIT_CHARS "\t\tp4 add lc/FILE.TXT &&\n"> <LIT_CHARS "\t\ttest_must_fail p4 submit -d \"Cannot add file differing only in case\" lc/FILE.TXT\n"> <LIT_CHARS "\t)\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Clone lc repo using lc name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit p4 clone //depot/lc/... &&\n"> <LIT_CHARS "\ttest_path_is_file lc/file.txt &&\n"> <LIT_CHARS "\tgit p4 clone //depot/UC/... &&\n"> <LIT_CHARS "\ttest_path_is_file UC/file.txt\n">]})
  (Com {[LIT_CHARS test_expect_failure]} {[SQ <LIT_CHARS "Clone lc repo using uc name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_must_fail git p4 clone //depot/LC/...\n">]})
  (Com {[LIT_CHARS test_expect_failure]} {[SQ <LIT_CHARS "Clone UC repo with lc name">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_must_fail git p4 clone //depot/uc/...\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "kill p4d">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tkill_p4d\n">]})
  (Com {[LIT_CHARS test_done]})
)