view lphobos/internal/moduleinit.d @ 11:d3ee9efe20e2 trunk

[svn r15] * Fixed a bunch problems with virtual calls. Seems I did some rather poor testing. * Now 50/51 tests compile. * Added a simple runalltests.d scripts that should be run with 'gdmd -run runalltests.d' - LLVMDC will not compile it yet.
author lindquist
date Tue, 02 Oct 2007 05:10:18 +0200
parents c53b6e3fe49a
children
line wrap: on
line source

module internal.moduleinit;

private alias extern(C) void function() fptr_t;

extern(C):

fptr_t* _d_get_module_ctors();
fptr_t* _d_get_module_dtors();

void _d_run_module_ctors()
{
    auto p = _d_get_module_ctors();
    while(*p) {
        (*p++)();
    }
}

void _d_run_module_dtors()
{
    auto p = _d_get_module_dtors();
    while(*p) {
        (*p++)();
    }
}