(testsuite) Drop ending block comments

Instead of writing `}; # if', write just `}' as was discussed here:

    http://www.mail-archive.com/bash-completion-devel@lists.alioth.debian.org/msg01815.html

test/config/default.exp

@@ -1,23 +1,23 @@
-    # Set default expect fallback routines
+# Set default expect fallback routines
 expect_after {
     eof {
         if {[info exists test]} {
             fail "$test at eof" 
         } else {
             fail "[info level 1] at eof" 
-        }; # if
+        }
-    }; # eof
+    }
     timeout {
         if {[info exists test]} {
             fail "$test at timeout" 
         } else {
             fail "[info level 1] at timeout" 
-        }; # if
+        }
-    }; # timeout
+    }
-}; # expect_after()
+}
 
 
-    # Call tool_start(), if available
+# Call tool_start(), if available
 if { [info procs "${tool}_start"] != "" } {
     ${tool}_start
-}; # if
+}

test/lib/completions/a2ps.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/abook.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/acroread.exp

@@ -1,13 +1,13 @@
 proc setup {} {
     save_env
     assert_bash_exec "touch fixtures/shared/default/t.pdf";  # Create temporary files
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_bash_exec "rm fixtures/shared/default/t.pdf";  # Remove temporary files
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/add_members.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/alias.exp

@@ -3,13 +3,13 @@ proc setup {} {
     assert_bash_exec "alias foo=bar"
     assert_bash_exec "alias bar='foo foo'"
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_bash_exec "unalias -a";  # Remove all aliases
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup
@@ -34,7 +34,7 @@ expect {
     -re "^alias foo\b\b\bfoo=foo\b\b\b$" { fail "$test: Wrong cursor position" }
     -re /@ { unresolved "$test" }
     default { unresolved "$test" }
-}; # expect
+}
 
 
 sync_after_int

test/lib/completions/animate.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/ant.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/apache2ctl.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/apt-build.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/apt-cache.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/apt-get.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/aptitude.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/arch.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/arpspoof.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/aspell.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/autoconf.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/automake.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/autorpm.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/awk.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/bash.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/bc.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/bison.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/bk.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/brctl.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/btdownloadcurses.py.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/btdownloadgui.py.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/btdownloadheadless.py.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/bzip2.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/c++.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/cancel.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup
@@ -22,7 +22,7 @@ if {[assert_exec {lp -H hold fixtures/shared/default/foo} job "" "untested"]} {
     assert_complete $jobs "cancel "
         # Remove/cancel the test print job
     assert_exec "cancel $job_id"
-}; # if
+}
 
 
 sync_after_int

test/lib/completions/cardctl.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/cat.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/cc.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/cd.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup
@@ -29,7 +29,7 @@ expect {
 	-re "^cd fixtures/shared/default/foo\b\b\bfoo.d/foo\b\b\b$" { fail "$test: Wrong cursor position" }
     -re /@ { unresolved "$test at prompt" }
     default { unresolved "$test" }
-}; # expect
+}
 
 
 sync_after_int

test/lib/completions/cdrecord.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/change_pw.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/check_db.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/check_perms.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/chgrp.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/chkconfig.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/chown.exp

@@ -1,10 +1,10 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/chsh.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/ci.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/civclient.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/civserver.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/cksfv.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/cleanarch.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/clisp.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/clone_member.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/co.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/composite.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/config_list.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/configure.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/convert.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/cowsay.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/cp.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/cpio.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/createdb.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/crontab.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/cryptsetup.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/csplit.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/cut.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/cvs.exp

@@ -1,7 +1,7 @@
 proc setup {} {
     save_env
     assert_bash_exec {OLDHOME=$HOME ; HOME=$TESTDIR/fixtures/cvs}
-}; # setup()
+}
 
 
 proc teardown {} {
@@ -9,7 +9,7 @@ proc teardown {} {
     assert_env_unmodified {
         /OLDHOME=/d
     }
-}; # teardown()
+}
 
 
 setup
@@ -27,7 +27,7 @@ send "$cmd\t"
 expect {
     -re "^$cmd\r\n.*:pserver:.*\r\n/@$cmd:pserver:.*$" { pass "$test" }
     default { fail "$test" }
-}; # expect
+}
 
 
 sync_after_int

test/lib/completions/cvsps.exp

@@ -1,7 +1,7 @@
 proc setup {} {
     save_env
     assert_bash_exec {OLDHOME=$HOME ; HOME=$TESTDIR/fixtures/cvs}
-}; # setup()
+}
 
 
 proc teardown {} {
@@ -9,7 +9,7 @@ proc teardown {} {
     assert_env_unmodified {
         /OLDHOME=/d
     }
-}; # teardown()
+}
 
 
 setup
@@ -27,7 +27,7 @@ send "$cmd\t"
 expect {
     -re "^$cmd\r\n.*:pserver:.*\r\n/@$cmd:pserver:.*$" { pass "$test" }
     default { fail "$test" }
-}; # expect
+}
 
 
 sync_after_int

test/lib/completions/date.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/dcop.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup
@@ -13,7 +13,7 @@ setup
 
 if {[assert_exec {dcop} words]} {
     assert_complete $words "dcop "
-}; # if
+}
 
 
 sync_after_int

test/lib/completions/dd.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup
@@ -24,7 +24,7 @@ expect -ex "$cmd"
 expect {
     -re "^=$" { pass $test }
     -re {^\\=$} { xfail $test }
-}; # expect
+}
 
 
 sync_after_int

test/lib/completions/df.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/dhclient.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/dict.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/diff.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/dir.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/display.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/dnsspoof.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/dpkg-deb.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/dpkg-reconfigure.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/dpkg-source.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/dpkg.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup
@@ -20,7 +20,7 @@ sync_after_int
     # Build list of installed packages
 if {[assert_exec {dpkg --get-selections | command grep \[\[:space:\]\]install$ | cut -f1} packages]} {
     assert_complete $packages "dpkg -L "
-}; # if
+}
 
 
 sync_after_int

test/lib/completions/dropdb.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/dselect.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/dsniff.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/du.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/dumpdb.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/enscript.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/env.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup
@@ -13,7 +13,7 @@ setup
 
 if {[assert_exec {env --help} "" "" "unsupported"]} {
     assert_complete_any "env --"
-}; # if
+}
 
 
 sync_after_int

test/lib/completions/evince.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified {/OLDPWD=/d}
-}; # teardown()
+}
 
 
 setup

test/lib/completions/expand.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup
@@ -13,7 +13,7 @@ setup
 
 if {[assert_exec {expand --help} "" "" "unsupported"]} {
     assert_complete_any "expand --"
-}; # if
+}
 
 
 sync_after_int

test/lib/completions/filesnarf.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/find.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified {/OLDPWD=/d}
-}; # teardown()
+}
 
 
 setup
@@ -50,28 +50,26 @@ sync_after_int
 
 
 set test "-uid should complete uids"
-    # Complete
 set cmd "find -uid "
 send "$cmd\t"
 expect {
     -re "$cmd\r\n\\d+.*/@$cmd$" { pass "$test" }
     -re /@ { unresolved "$test at prompt" }
     -re eof { unresolved "eof" }
-}; # expect
+}
 
 
 sync_after_int
 
 
 set test "-gid should complete gids"
-    # Complete
 set cmd "find -gid "
 send "$cmd\t"
 expect {
     -re "$cmd\r\n\\d+.*/@$cmd$" { pass "$test" }
     -re /@ { unresolved "$test at prompt" }
     -re eof { unresolved "eof" }
-}; # expect
+}
 
 
 sync_after_int

test/lib/completions/find_member.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/finger.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup
@@ -16,7 +16,7 @@ set test "Tab should complete usernames"
 set users {}
 foreach u [exec bash -c "compgen -A user"] {
     lappend users $u
-}; # foreach
+}
 assert_complete $users "finger " $test
 
 
@@ -45,9 +45,9 @@ foreach h [get_known_hosts] {
         if {$first == $char && [lsearch -exact $hosts "test@$h"] == -1} {
             # Prefix hosts with username 'test@'
             lappend hosts "test@$h"
-        }; # if
+        }
-    }; # if
+    }
-}; # foreach
+}
 assert_complete $hosts "finger test@$char" $test
 
 

test/lib/completions/fmt.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup
@@ -13,7 +13,7 @@ setup
 
 if {[assert_exec {fmt --help} "" "" "unsupported"]} {
     assert_complete_any "fmt -"
-}; # if
+}
 
 
 sync_after_int

test/lib/completions/fold.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup
@@ -13,7 +13,7 @@ setup
 
 if {[assert_exec {fold --help} "" "" "unsupported"]} {
     assert_complete_any "fold --"
-}; # if
+}
 
 
 sync_after_int

test/lib/completions/g++.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/g4.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/g77.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/gcc.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/gcj.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup

test/lib/completions/gcl.exp

@@ -1,11 +1,11 @@
 proc setup {} {
     save_env
-}; # setup()
+}
 
 
 proc teardown {} {
     assert_env_unmodified
-}; # teardown()
+}
 
 
 setup