1# Tests for completion system. 2 3%prep 4 if ( zmodload -i zsh/zpty ) >/dev/null 2>&1; then 5 . $ZTST_srcdir/comptest 6 mkdir comp.tmp 7 cd comp.tmp 8 comptestinit -z $ZTST_testdir/../Src/zsh && 9 { 10 mkdir dir1 && 11 mkdir dir2 && 12 touch file1 && 13 touch file2 14 } 15 else 16 ZTST_unimplemented="the zsh/zpty module is not available" 17 fi 18 19%test 20 21 comptest $': \t\t\t\t\t\t\t' 220:directories and files 23>line: {: }{} 24>DESCRIPTION:{file} 25>DI:{dir1} 26>DI:{dir2} 27>FI:{file1} 28>FI:{file2} 29>line: {: dir1/}{} 30>line: {: dir2/}{} 31>line: {: file1}{} 32>line: {: file2}{} 33>line: {: dir1/}{} 34>line: {: dir2/}{} 35 36 comptesteval '_users () { compadd user1 user2 }' 37 comptest $': ~\t\t\t\t\t' 380:tilde 39>line: {: ~user}{} 40>line: {: ~user}{} 41>NO:{user1} 42>NO:{user2} 43>line: {: ~user1}{} 44>line: {: ~user2}{} 45>line: {: ~user1}{} 46 47 comptest $'echo ;:\C-b\C-b\t' 480:directories and files before separator 49>line: {echo }{;:} 50>DESCRIPTION:{file} 51>DI:{dir1} 52>DI:{dir2} 53>FI:{file1} 54>FI:{file2} 55 56# Depends on path assignment in comptestinit 57 comptesteval "path=( $ZTST_srcdir:A )" 58 comptest $'zt\t' 590:command 60>line: {ztst.zsh }{} 61 62 comptesteval "path=( $ZTST_srcdir:A )" 63 comptest $':;zt\t' 640:command after separator 65>line: {:;ztst.zsh }{} 66F:regression test workers/32182 67 68 comptest $'for f in 1; do < x\C-b\C-b\t' 690:redirection after "for ...; do" 70>line: {for f in 1; do <}{ x} 71>DESCRIPTION:{file} 72>DI:{dir1} 73>DI:{dir2} 74>FI:{file1} 75>FI:{file2} 76F:regression test workers/31611 77 78%clean 79 80 zmodload -ui zsh/zpty 81