Retro68/gcc/libphobos/testsuite/libphobos.shared/libloaddep.d

14 lines
359 B
D
Raw Normal View History

2019-06-02 15:48:37 +00:00
import core.runtime, core.sys.posix.dlfcn;
extern(C) alias RunTests = int function();
extern(C) int runDepTests(const char* name)
{
auto h = rt_loadLibrary(name);
if (h is null) return false;
auto runTests = cast(RunTests).dlsym(h, "runTests");
assert(runTests !is null);
if (!runTests()) return false;
return rt_unloadLibrary(h);
}