Mercurial > projects > ldc
view runtime/internal/invariant.d @ 826:ea4c6adf8b00
Added testcase for fix in rev [825]
author | Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> |
---|---|
date | Thu, 04 Dec 2008 16:12:47 +0100 |
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); }