allow saving and restoring current arguments to/from slots.

This commit is contained in:
Vítor Santos Costa
2010-08-04 17:36:20 +01:00
parent f2dff606ef
commit f1977f5dab
5 changed files with 45 additions and 15 deletions

View File

@@ -35,14 +35,6 @@
run_tests/1
]).
:- asserta(user:file_search_path(foreign, '../sgml')).
:- asserta(user:file_search_path(foreign, '../semweb')).
:- asserta(user:file_search_path(foreign, '../clib')).
:- asserta(user:file_search_path(library, '..')).
:- asserta(user:file_search_path(library, '../sgml')).
:- asserta(user:file_search_path(library, '.')).
:- asserta(user:file_search_path(library, '../plunit')).
:- asserta(user:file_search_path(library, '../clib')).
:- use_module(library(plunit)).
:- use_module(library(rdf_write)).
@@ -50,7 +42,7 @@
:- use_module(library(lists)).
:- use_module(library(debug)).
:- use_module(library(semweb/rdf_db)).
:- use_module(rdf).
:- use_module(library(rdf)).
:- expects_dialect(swi).
:- assert(system:swi_io).

View File

@@ -22,8 +22,8 @@
% get libraries locally
:- asserta(user:file_search_path(library, '.')).
:- use_module(rdf). % our RDF parser
:- use_module(rdf_ntriples). % read .nt files
:- use_module(library(rdf)). % our RDF parser
:- use_module(library(rdf_ntriples)). % read .nt files
:- load_files([ library(pce),
library(toolbar),
library(pce_report),