Mercurial > projects > ldc
view tests/mini/phobos/bug71.d @ 1065:dc576c7e4b1e
Fix to make sure to create gen/ in build dir and unbreak build with older perl
author | Frits van Bommel <fvbommel wxs.nl> |
---|---|
date | Sun, 08 Mar 2009 16:37:55 +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; } }