From 32cbd34ff1938545ea7a3c9e33509284865ba81f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?V=C3=ADtor=20Santos=20Costa?= Date: Fri, 18 Jun 2010 00:27:51 +0100 Subject: [PATCH] add shlib to autoloader (SWI emulation). --- library/INDEX.pl | 8 ++++++++ library/autoloader.yap | 1 + 2 files changed, 9 insertions(+) diff --git a/library/INDEX.pl b/library/INDEX.pl index f471d120c..5b5896eca 100644 --- a/library/INDEX.pl +++ b/library/INDEX.pl @@ -345,6 +345,14 @@ index(read_file_to_terms,2,readutil,library(readutil)). index(read_file_to_terms,3,readutil,library(readutil)). index(regexp,3,regexp,library(regexp)). index(regexp,4,regexp,library(regexp)). +index(load_foreign_library,1,shlib,library(shlib)). +index(load_foreign_library,2,shlib,library(shlib)). +index(unload_foreign_library,1,shlib,library(shlib)). +index(unload_foreign_library,2,shlib,library(shlib)). +index(current_foreign_library,2,shlib,library(shlib)). +index(reload_foreign_libraries,0,shlib,library(shlib)). +index(use_foreign_library,1,shlib,library(shlib)). +index(use_foreign_library,2,shlib,library(shlib)). index(datime,1,operating_system_support,library(system)). index(delete_file,1,operating_system_support,library(system)). index(delete_file,2,operating_system_support,library(system)). diff --git a/library/autoloader.yap b/library/autoloader.yap index bc94008c8..951ae6b06 100644 --- a/library/autoloader.yap +++ b/library/autoloader.yap @@ -39,6 +39,7 @@ scan_library_exports :- scan_exports(rbtrees, library(rbtrees)), scan_exports(readutil, library(readutil)), scan_exports(regexp, library(regexp)), + scan_exports('../LGPL/shlib', library(shlib)), scan_exports(system, library(system)), scan_exports(terms, library(terms)), scan_exports(timeout, library(timeout)),