diff --git a/test/completion/rpcdebug.exp b/test/completion/rpcdebug.exp
new file mode 100644
index 00000000..add86388
--- /dev/null
+++ b/test/completion/rpcdebug.exp
@@ -0,0 +1 @@
+assert_source_completions rpcdebug
diff --git a/test/completion/strace.exp b/test/completion/strace.exp
new file mode 100644
index 00000000..717db3a3
--- /dev/null
+++ b/test/completion/strace.exp
@@ -0,0 +1 @@
+assert_source_completions strace
diff --git a/test/completion/xmllint.exp b/test/completion/xmllint.exp
new file mode 100644
index 00000000..64210c80
--- /dev/null
+++ b/test/completion/xmllint.exp
@@ -0,0 +1 @@
+assert_source_completions xmllint
diff --git a/test/completion/xmlwf.exp b/test/completion/xmlwf.exp
new file mode 100644
index 00000000..afe823b6
--- /dev/null
+++ b/test/completion/xmlwf.exp
@@ -0,0 +1 @@
+assert_source_completions xmlwf
diff --git a/test/completion/xrandr.exp b/test/completion/xrandr.exp
new file mode 100644
index 00000000..37dcedcc
--- /dev/null
+++ b/test/completion/xrandr.exp
@@ -0,0 +1 @@
+assert_source_completions xrandr
diff --git a/test/lib/completions/rpcdebug.exp b/test/lib/completions/rpcdebug.exp
new file mode 100644
index 00000000..8629c947
--- /dev/null
+++ b/test/lib/completions/rpcdebug.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "rpcdebug -"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/strace.exp b/test/lib/completions/strace.exp
new file mode 100644
index 00000000..55004d20
--- /dev/null
+++ b/test/lib/completions/strace.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "strace -"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/xmllint.exp b/test/lib/completions/xmllint.exp
new file mode 100644
index 00000000..15451471
--- /dev/null
+++ b/test/lib/completions/xmllint.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "xmllint "
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/xmlwf.exp b/test/lib/completions/xmlwf.exp
new file mode 100644
index 00000000..a996d458
--- /dev/null
+++ b/test/lib/completions/xmlwf.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "xmlwf "
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/xrandr.exp b/test/lib/completions/xrandr.exp
new file mode 100644
index 00000000..649ed43b
--- /dev/null
+++ b/test/lib/completions/xrandr.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "xrandr "
+
+
+sync_after_int
+
+
+teardown