URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [gdb-6.8/] [gdb/] [testsuite/] [gdb.base/] [solib-disc.c] - Rev 157
Compare with Previous | Blame | View Log
/* This testcase is part of GDB, the GNU debugger. Copyright 2007, 2008 Free Software Foundation, Inc. This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see <http://www.gnu.org/licenses/>. */ #include <stdio.h> #include <stdlib.h> #ifdef __WIN32__ #include <windows.h> #define dlopen(name, mode) LoadLibrary (name) #define dlsym(handle, func) GetProcAddress (handle, func) #define dlclose(handle) FreeLibrary (handle) #define dlerror() "an error occurred" #else #include <dlfcn.h> #endif int main() { void *handle; void (*func) (void); handle = dlopen (SHLIB_NAME, RTLD_LAZY); if (!handle) { fprintf (stderr, dlerror ()); exit (1); } func = (void (*)(void)) dlsym (handle, "shrfunc"); if (!func) { fprintf (stderr, dlerror ()); exit (1); } func (); dlclose (handle); return 0; }