test: do not let async-response run with Base

2 files changed, 15 insertions, 0 deletions

diff --git a/t/t0200-async-response.sh b/t/t0200-async-response.sh
index f3ead0b..de5a7de 100755
--- a/t/t0200-async-response.sh
+++ b/t/t0200-async-response.sh
@@ -2,6 +2,8 @@
 CONFIG_RU=${CONFIG_RU-'async-response.ru'}
 . ./test-lib.sh
 
+skip_models Base
+
 case $CONFIG_RU in
 *no-autochunk.ru)
         t_plan 7 "async response w/o autochunk for $model"
diff --git a/t/test-lib.sh b/t/test-lib.sh
index 04ebeb1..bf2e7b5 100644
--- a/t/test-lib.sh
+++ b/t/test-lib.sh
@@ -42,6 +42,19 @@ require_check () {
         fi
 }
 
+skip_models () {
+        for i in "$@"
+        do
+                if test x"$model" != x"$i"
+                then
+                        continue
+                fi
+                t_info "skipping $T since it is not compatible with $model"
+                exit 0
+        done
+}
+
+
 # given a list of variable names, create temporary files and assign
 # the pathnames to those variables
 rtmpfiles () {