annotate tests/mini/bug71.d @ 341:1bb99290e03a trunk

[svn r362] Started merging the old 'test' dir as well as the newer 'tangotests' dir into 'tests/mini' and 'tests/minicomplex'.
author lindquist
date Sun, 13 Jul 2008 02:51:19 +0200
parents test/bug71.d@288fe1029e1f
children
rev   line source
lindquist@108 1 module bug71;
lindquist@108 2
lindquist@108 3 void main()
lindquist@108 4 {
lindquist@108 5 static TypeInfo skipCI(TypeInfo valti)
lindquist@108 6 {
lindquist@108 7 while (1)
lindquist@108 8 {
lindquist@108 9 if (valti.classinfo.name.length == 18 &&
lindquist@108 10 valti.classinfo.name[9..18] == "Invariant")
lindquist@108 11 valti = (cast(TypeInfo_Invariant)valti).next;
lindquist@108 12 else if (valti.classinfo.name.length == 14 &&
lindquist@108 13 valti.classinfo.name[9..14] == "Const")
lindquist@108 14 valti = (cast(TypeInfo_Const)valti).next;
lindquist@108 15 else
lindquist@108 16 break;
lindquist@108 17 }
lindquist@108 18 return valti;
lindquist@108 19 }
lindquist@108 20 }