/[cmucl]/src/lisp/FreeBSD-os.c
ViewVC logotype

Diff of /src/lisp/FreeBSD-os.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.8 by moore, Tue Aug 27 22:18:30 2002 UTC revision 1.9 by moore, Wed Aug 28 07:16:38 2002 UTC
# Line 216  void *os_dlsym(const char *sym_name, lis Line 216  void *os_dlsym(const char *sym_name, lis
216          for (lib_list_head = lib_list;          for (lib_list_head = lib_list;
217               lib_list_head != NIL;               lib_list_head != NIL;
218               lib_list_head = (CONS(lib_list_head))->cdr) {               lib_list_head = (CONS(lib_list_head))->cdr) {
219              struct cons *lib_cons = (CONS(lib_list_head))->car;              struct cons *lib_cons = CONS(CONS(lib_list_head)->car);
220              struct sap *dlhandle = (CONS(lib_cons))->car;              struct sap *dlhandle = (struct sap *)PTR(lib_cons->car);
221              void *sym_addr = dlsym((void *)dlhandle->pointer, sym_name);              void *sym_addr = dlsym((void *)dlhandle->pointer, sym_name);
222    
223              if (sym_addr)              if (sym_addr)

Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9

  ViewVC Help
Powered by ViewVC 1.1.5