view runtime/internal/invariant.d @ 1536:49ae9728bea4

Check for ldc.conf next to the ldc binary before home and etc. The new search order is * current working directory * next to executable * user home directory * prefix/etc * prefix/etc/ldc * /etc * /etc/ldc
author Christian Kamm <kamm incasoftware de>
date Mon, 13 Jul 2009 22:24:12 +0200
parents d7ec997de427
children
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)
	{
	    void delegate() inv;
	    inv.ptr = cast(void*) o;
	    inv.funcptr = c.classInvariant;
	    inv();
	}
	c = c.base;
    } while (c);
}