--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lphobos/internal/moduleinit.d	Sat Sep 01 21:43:27 2007 +0200
@@ -0,0 +1,24 @@
+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++)();
+    }
+}