#!/usr/bin/guile !# (import (sph) (sph list) (sph test)) (define settings (test-settings-default-custom only (list-q (test module sph storage dg relation path-find) (test module sph storage dg import) (test module sph storage dg authentication)) path-search "modules" reporter-name (q compact))) (test-execute-modules-by-prefix #:settings settings (q (test module sph storage dg)))