some tests

2016-01-03 13:54:14 +00:00
parent 1c5b6c3687
commit bc53e8bae9
2 changed files with 56 additions and 0 deletions
--- a/regression/modules/meta.yap
+++ b/regression/modules/meta.yap
@@ -0,0 +1,18 @@
+
+% :- library(test).
+
+%:- multifile ytest:test/4.
+
+:- source.
+
+:- [library(ytest)].
+:- [library(ytest/preds)].
+
+meta_expand(InputCl, C1) :-
+    source_module(SM),
+    '$yap_strip_module'(SM:InputCl, M, ICl),
+    '$expand_a_clause'( M:ICl, SM, C1, _CO).
+
+:- [meta_tests].
+
+:- run_tests.