diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

better support for YAP portability.

Browse Source
This commit is contained in:
Vitor Santos Costa 2010-11-28 11:50:21 +00:00
parent 92f647556d
commit c47419ed03
1 changed files with 18 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
packages/semweb/rdf_db.pl
View File

@ -127,6 +127,10 @@
(rdf_meta)/1, % +Heads (rdf_meta)/1, % +Heads
op(1150, fx, (rdf_meta)) op(1150, fx, (rdf_meta))
]). ]).
:- expects_dialect(swi).
:- assert(system:swi_io).
:- use_module(library(rdf)). :- use_module(library(rdf)).
:- use_module(library(lists)). :- use_module(library(lists)).
:- use_module(library(shlib)). :- use_module(library(shlib)).
@ -153,6 +157,16 @@
:- discontiguous :- discontiguous
term_expansion/2. term_expansion/2.
:- meta_predicate
rdf_transaction(0),
rdf_transaction(0, +),
rdf_monitor(1, +),
rdf_save(+, :),
rdf_load(+, :).
:- thread_local
named_anon/2. % +Resource, -Id
/** <module> Core RDF database /** <module> Core RDF database
@see Documentation for semweb package @see Documentation for semweb package
@ -1369,16 +1383,6 @@ rdf_reset_db :-
% file-url (=|file://path|=) or a stream wrapped % file-url (=|file://path|=) or a stream wrapped
% in a term stream(Out). % in a term stream(Out).
:- meta_predicate
rdf_transaction(0),
rdf_transaction(0, +),
rdf_monitor(1, +),
rdf_save(+, :),
rdf_load(+, :).
:- thread_local
named_anon/2. % +Resource, -Id
rdf_save(File) :- rdf_save(File) :-
rdf_save2(File, []). rdf_save2(File, []).
@ -2183,3 +2187,7 @@ into(_, _) --> []. % TBD
in_time(Triples, ParseTime) --> in_time(Triples, ParseTime) -->
[ ' in ~2f sec; ~D triples'-[ParseTime, Triples] [ ' in ~2f sec; ~D triples'-[ParseTime, Triples]
]. ].
:- retract(system:swi_io).