view runtime/internal/invariant.d @ 579:20c065c46b38

Basic support for runtime in shared library. Needs to be built with runtime/build-sharedlibs.sh and activated manually by providing -defaultlib=llvmdc-runtime-shared -defaultlib=tango-cc-tango-shared -defaultlib=tango-gc-basic-shared on llvmdc call at the moment. To support D shared libraries in non-D code, we need to remove the main() from libllvmdc-runtime-shared.
author Christian Kamm <kamm incasoftware de>
date Fri, 05 Sep 2008 23:02:18 +0200
parents d30c40f1128d
children d7ec997de427
line wrap: on
line source


/*
 * Placed into the Public Domain
 * written by Walter Bright
 * www.digitalmars.com
 */

extern(C) void _d_invariant(Object o)
{   ClassInfo c;

    //printf("__d_invariant(%p)\n", o);

    // BUG: needs to be filename/line of caller, not library routine
    assert(o !is null);	// just do null check, not invariant check

    c = o.classinfo;
    do
    {
	if (c.classInvariant)
	{
	    (*c.classInvariant)(o);
	}
	c = c.base;
    } while (c);
}