yap-6.3/pl/udi.yap

/*************************************************************************
*									 *
*	 YAP Prolog 							 *
*									 *
*	Yap Prolog was developed at NCCUP - Universidade do Porto	 *
*									 *
* Copyright L.Damas, V.S.Costa and Universidade do Porto 1985-2010	 *
*									 *
**************************************************************************
*									 *
* File:		udi.yap							 *
* Last rev:	17/12/2012						 *
* mods:									 *
* comments:	support user defined indexing				 *
*									 *
*************************************************************************/

:- system_module( '$_udi', [udi/1], []).

:- meta_predicate udi(:).

/******************
*     udi/1     *
******************/

udi(Pred) :-
   '$udi_init'(Pred).
trivial interface to udi code (for now). 2009-02-12 21:40:44 +00:00			`/*************************************************************************`
			`* *`
			`* YAP Prolog *`
			`* *`
			`* Yap Prolog was developed at NCCUP - Universidade do Porto *`
			`* *`
fix save_program to reload foreign files SWI style when restarting. 2010-11-29 18:44:39 +00:00			`* Copyright L.Damas, V.S.Costa and Universidade do Porto 1985-2010 *`
trivial interface to udi code (for now). 2009-02-12 21:40:44 +00:00			`* *`
			`**************************************************************************`
			`* *`
fix save_program to reload foreign files SWI style when restarting. 2010-11-29 18:44:39 +00:00			`* File: udi.yap *`
New work on UDI 2012-12-17 20:23:03 +00:00			`* Last rev: 17/12/2012 *`
trivial interface to udi code (for now). 2009-02-12 21:40:44 +00:00			`* mods: *`
fix save_program to reload foreign files SWI style when restarting. 2010-11-29 18:44:39 +00:00			`* comments: support user defined indexing *`
trivial interface to udi code (for now). 2009-02-12 21:40:44 +00:00			`* *`
			`*************************************************************************/`

fix string_concat/2 2014-04-09 12:39:29 +01:00			`:- system_module( '$_udi', [udi/1], []).`

trivial interface to udi code (for now). 2009-02-12 21:40:44 +00:00			`:- meta_predicate udi(:).`

			`/******************`
			`* udi/1 *`
			`******************/`

			`udi(Pred) :-`
New work on UDI 2012-12-17 20:23:03 +00:00			`'$udi_init'(Pred).`