@@ -1314,5 +1314,14 @@
     (if *runremote*
       (let ((host (vector-ref *runremote* 0))
 	    (port (vector-ref *runremote* 1)))
 	((rpc:procedure 'rdb:test-data-rollup host port) test-id status))
       (db:test-data-rollup db test-id status)))
+
+(define (rdb:test-get-paths-matching db keynames target)
+   (if *runremote*
+       (let ((host (vector-ref *runremote* 0))
+	     (port (vector-ref *runremote* 1)))
+	 ((rpc:procedure 'rdb:test-get-paths-matching host port) keynames target))
+       (db:test-get-paths-matching db keynames target)))
+
+