diff options
Diffstat (limited to 'testsuite/aplwc.bin/example.exp')
| -rw-r--r-- | testsuite/aplwc.bin/example.exp | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/testsuite/aplwc.bin/example.exp b/testsuite/aplwc.bin/example.exp index 15ba15c..296dc0e 100644 --- a/testsuite/aplwc.bin/example.exp +++ b/testsuite/aplwc.bin/example.exp @@ -1,2 +1,8 @@ -spawn "${aplwc_bin}" -fail "not implemented" +aplwc_start +expect { + " " { pass "6-space prompt" } +} +send "\004" +expect { + eof { pass "EOT ends the session" } +} |