home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
plbin.zip
/
pl
/
library
/
dld.pl
< prev
next >
Wrap
Text File
|
1992-05-26
|
557b
|
31 lines
/* dld.pl,v 1.1.1.1 1992/05/26 11:51:35 jan Exp
Copyright (c) 1990 Jan Wielemaker. All rights reserved.
jan@swi.psy.uva.nl
Purpose: load dynamic linker
*/
:- module(dld,
[ dld_link/1
, dld_unlink/1
, dld_call/1
, dld_list_undefined/0
, dld_function/2
, dld_initialise/1
]).
load_dld :-
'$arch'(Mach, _),
'$home'(SwiHome),
concat_atom(['-L', SwiHome, '/library/', Mach], LibDir),
load_foreign(library(dld),
dld_start,
LibDir,
'-ldld',
46000).
:- load_dld.
:- module_transparent dld_call/1.