fix string_concat/2

2014-04-09 12:39:29 +01:00
parent 8b9da05d66
commit a8c77d2609
50 changed files with 927 additions and 67 deletions
--- a/pl/utils.yap
+++ b/pl/utils.yap
@@ -15,6 +15,23 @@
 *									 *
 *************************************************************************/

+:- system_module( '$_utils', [callable/1,
+        current_op/3,
+        nb_current/2,
+        nth_instance/3,
+        nth_instance/4,
+        op/3,
+        prolog/0,
+        recordaifnot/3,
+        recordzifnot/3,
+        simple/1,
+        subsumes_term/2], ['$getval_exception'/3]).
+
+:- use_system_module( '$_boot', ['$live'/0]).
+
+:- use_system_module( '$_errors', ['$do_error'/2]).
+
+
 op(P,T,V) :-
 	 '$check_op'(P,T,V,op(P,T,V)),
 	 '$op'(P, T, V).