view tests/mini/phobos/bug71.d @ 807:d92acb81a583

Add interface minitest, rework s.d.
author Christian Kamm <kamm incasoftware de>
date Sun, 30 Nov 2008 11:54:18 +0100
parents fc098100ecc7
children
line wrap: on
line source

module bug71;

void main()
{
    static TypeInfo skipCI(TypeInfo valti)
    {
      while (1)
      {
    if (valti.classinfo.name.length == 18 &&
        valti.classinfo.name[9..18] == "Invariant")
        valti = (cast(TypeInfo_Invariant)valti).next;
    else if (valti.classinfo.name.length == 14 &&
        valti.classinfo.name[9..14] == "Const")
        valti = (cast(TypeInfo_Const)valti).next;
    else
        break;
      }
      return valti;
    }
}