28 |
#include "guile-ltdl.h" |
#include "guile-ltdl.h" |
29 |
|
|
30 |
#define lt_dlhandle_struct scm_i_lt_dlhandle_struct |
#define lt_dlhandle_struct scm_i_lt_dlhandle_struct |
31 |
|
#define SCM_INSERTED_DLSYMLIST_STRUCT_DECL scm_i_lt_dlsymlist_struct |
32 |
|
|
33 |
#define LT_SCOPE static |
#define LT_SCOPE static |
34 |
#define SCMLTXT static |
#define SCMLTXT static |
44 |
#include "raw-ltdl.c" |
#include "raw-ltdl.c" |
45 |
|
|
46 |
void |
void |
47 |
scm_lt_dlset_preloaded_symbols (void) |
scm_lt_dlpreload_default (const scm_lt_dlsymlist *preloads) |
48 |
{ |
{ |
49 |
extern const lt_dlsymlist lt_preloaded_symbols[]; |
lt_dlpreload_default(preloads); |
|
lt_dlpreload_default(lt_preloaded_symbols); |
|
50 |
} |
} |
51 |
|
|
52 |
int |
int |