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