Reviewed tests g*

Removed excess parenthesis from gdb completion

contrib/gdb

@@ -32,7 +32,7 @@ _gdb()
 	elif [ $COMP_CWORD -eq 2 ]; then
 		prev=${prev##*/}
 		COMPREPLY=( $( compgen -fW "$( command ps axo comm,pid | \
-				awk '{if ($1 ~ /^'"$prev"'/) print $2}' ) )" \
+				awk '{if ($1 ~ /^'"$prev"'/) print $2}' )" \
 				-- "$cur" ) )
 	fi
 } &&

test/_completion_to_review/g++.exp

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

test/_completion_to_review/g4.exp

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

test/_completion_to_review/g77.exp

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

test/_completion_to_review/gcc.exp

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

test/_completion_to_review/gcj.exp

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

test/_completion_to_review/gcl.exp

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

test/_completion_to_review/gdb.exp

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

test/_completion_to_review/genaliases.exp

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

test/_completion_to_review/getent.exp

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

test/_completion_to_review/gkrellm.exp

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

test/_completion_to_review/gmplayer.exp

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

test/_completion_to_review/gnatmake.exp

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

test/_completion_to_review/gpc.exp

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

test/_completion_to_review/gperf.exp

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

test/_completion_to_review/gpg.exp

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

test/_completion_to_review/gprof.exp

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

test/_completion_to_review/grep.exp

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

test/_completion_to_review/grub.exp

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

test/completion/c++.exp

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

test/completion/g++.exp

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

test/completion/g4.exp

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

test/completion/g77.exp

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

test/completion/gcc.exp

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

test/completion/gcj.exp

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

test/completion/gcl.exp

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

test/completion/gdb.exp

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

test/completion/genaliases.exp

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

test/completion/getent.exp

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

test/completion/gkrellm.exp

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

test/completion/gmplayer.exp

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

test/completion/gnatmake.exp

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

test/completion/gpc.exp

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

test/completion/gperf.exp

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

test/completion/gpg.exp

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

test/completion/gprof.exp

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

test/completion/grep.exp

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

test/completion/grub.exp

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

test/lib/completions/g++.exp

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

test/lib/completions/g4.exp

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

test/lib/completions/g77.exp

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

test/lib/completions/gcc.exp

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

test/lib/completions/gcj.exp

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

test/lib/completions/gcl.exp

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

test/lib/completions/gdb.exp

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

test/lib/completions/genaliases.exp

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

test/lib/completions/getent.exp

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

test/lib/completions/gkrellm.exp

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

test/lib/completions/gmplayer.exp

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

test/lib/completions/gnatmake.exp

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

test/lib/completions/gpc.exp

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

test/lib/completions/gperf.exp

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

test/lib/completions/gpg.exp

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

test/lib/completions/gprof.exp

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

test/lib/completions/grep.exp

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

test/lib/completions/grub.exp

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

test/lib/completions_to_review/g++.exp

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

test/lib/completions_to_review/g4.exp

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

test/lib/completions_to_review/g77.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "g77 "
-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/gcc.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "gcc "
-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/gcj.exp

@@ -1,31 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "gcj "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-# Interrupt command
-
-set test "Sync after INT"
-sleep 0.01
-send \031\003;  # QUIT/INT
-expect -ex /@
-
-
-teardown

test/lib/completions_to_review/gcl.exp

@@ -1,31 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "gcl "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-# Interrupt command
-
-set test "Sync after INT"
-sleep 0.01
-send \031\003;  # QUIT/INT
-expect -ex /@
-
-
-teardown

test/lib/completions_to_review/gdb.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "gdb - "
-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/genaliases.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "genaliases -"
-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/getent.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "getent "
-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/gkrellm.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "gkrellm -"
-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/gmplayer.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "gmplayer "
-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/gnatmake.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "gnatmake "
-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/gpc.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "gpc "
-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/gperf.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "gperf "
-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/gpg.exp

@@ -1,31 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "gpg "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-# Interrupt command
-
-set test "Sync after INT"
-sleep 0.01
-send \031\003;  # QUIT/INT
-expect -ex /@
-
-
-teardown

test/lib/completions_to_review/gprof.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "gprof "
-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/grep.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "grep "
-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/grub.exp

@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "grub "
-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