Reviewed tests t*

test/_completion_to_review/tac.exp

@@ -1 +0,0 @@
-source "lib/completions/tac.exp"

test/_completion_to_review/tail.exp

@@ -1 +0,0 @@
-source "lib/completions/tail.exp"

test/_completion_to_review/tar.exp

@@ -1 +0,0 @@
-source "lib/completions/tar.exp"

test/_completion_to_review/tcpkill.exp

@@ -1 +0,0 @@
-source "lib/completions/tcpkill.exp"

test/_completion_to_review/tcpnice.exp

@@ -1 +0,0 @@
-source "lib/completions/tcpnice.exp"

test/_completion_to_review/tee.exp

@@ -1 +0,0 @@
-source "lib/completions/tee.exp"

test/_completion_to_review/texindex.exp

@@ -1 +0,0 @@
-source "lib/completions/texindex.exp"

test/_completion_to_review/time.exp

@@ -1 +0,0 @@
-source "lib/completions/time.exp"

test/_completion_to_review/touch.exp

@@ -1 +0,0 @@
-source "lib/completions/touch.exp"

test/_completion_to_review/tr.exp

@@ -1 +0,0 @@
-source "lib/completions/tr.exp"

test/completion/tac.exp

@@ -0,0 +1,3 @@
+if {[assert_bash_type tac]} {
+    source "lib/completions/tac.exp"
+}; # if

test/completion/tail.exp

@@ -0,0 +1,3 @@
+if {[assert_bash_type tail]} {
+    source "lib/completions/tail.exp"
+}; # if

test/completion/tar.exp

@@ -0,0 +1,3 @@
+if {[assert_bash_type tar]} {
+    source "lib/completions/tar.exp"
+}; # if

test/completion/tcpkill.exp

@@ -0,0 +1,3 @@
+if {[assert_bash_type tcpkill]} {
+    source "lib/completions/tcpkill.exp"
+}; # if

test/completion/tcpnice.exp

@@ -0,0 +1,3 @@
+if {[assert_bash_type tcpnice]} {
+    source "lib/completions/tcpnice.exp"
+}; # if

test/completion/tee.exp

@@ -0,0 +1,3 @@
+if {[assert_bash_type tee]} {
+    source "lib/completions/tee.exp"
+}; # if

test/completion/texindex.exp

@@ -0,0 +1,3 @@
+if {[assert_bash_type texindex]} {
+    source "lib/completions/texindex.exp"
+}; # if

test/completion/tightvncviewer.exp

@@ -1,3 +1,3 @@
-if {[assert_bash_type {tightvncviewer}]} {
+if {[assert_bash_type tightvncviewer]} {
     source "lib/completions/tightvncviewer.exp"
 }; # if

test/completion/time.exp

@@ -0,0 +1,3 @@
+if {[assert_bash_type time]} {
+    source "lib/completions/time.exp"
+}; # if

test/completion/touch.exp

@@ -0,0 +1,3 @@
+if {[assert_bash_type touch]} {
+    source "lib/completions/touch.exp"
+}; # if

test/completion/tr.exp

@@ -0,0 +1,3 @@
+if {[assert_bash_type tr]} {
+    source "lib/completions/tr.exp"
+}; # if

test/lib/completions/tac.exp

@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "tac --"
+
+
+sync_after_int
+
+
+teardown

test/lib/completions/tail.exp

@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "tail --"
+
+
+sync_after_int
+
+
+teardown

test/lib/completions/tar.exp

@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "tar "
+
+
+sync_after_int
+
+
+teardown

test/lib/completions/tcpkill.exp

@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "tcpkill -"
+
+
+sync_after_int
+
+
+teardown

test/lib/completions/tcpnice.exp

@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "tcpnice -"
+
+
+sync_after_int
+
+
+teardown

test/lib/completions/tee.exp

@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "tee "
+
+
+sync_after_int
+
+
+teardown

test/lib/completions/texindex.exp

@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "texindex --"
+
+
+sync_after_int
+
+
+teardown

test/lib/completions/tightvncviewer.exp

@@ -11,15 +11,7 @@ proc teardown {} {
 setup
 
 
-set test "Tab should show completions"
+assert_complete_any "tightvncviewer "
-    # Try completion
-set cmd "tightvncviewer "
-send "$cmd\t"
-expect {
-    -re "$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
 
 
 sync_after_int

test/lib/completions/time.exp

@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "time set"
+
+
+sync_after_int
+
+
+teardown

test/lib/completions/touch.exp

@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "touch --"
+
+
+sync_after_int
+
+
+teardown

test/lib/completions/tr.exp

@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "tr --"
+
+
+sync_after_int
+
+
+teardown

test/lib/completions_to_review/tac.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "tac --"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown

test/lib/completions_to_review/tail.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "tail "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown

test/lib/completions_to_review/tar.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "tar "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown

test/lib/completions_to_review/tcpkill.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "tcpkill -"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown

test/lib/completions_to_review/tcpnice.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "tcpnice -"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown

test/lib/completions_to_review/tee.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "tee "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown

test/lib/completions_to_review/texindex.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "texindex "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown

test/lib/completions_to_review/time.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "time set"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown

test/lib/completions_to_review/touch.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "touch "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown

test/lib/completions_to_review/tr.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "tr "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown