annotate dmd/TypeInfoClassDeclaration.d @ 0:10317f0c89a5

Initial commit
author korDen
date Sat, 24 Oct 2009 08:42:06 +0400
parents
children 2e2a5c3f943a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1 module dmd.TypeInfoClassDeclaration;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
2
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
3 import dmd.Type;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
4 import dmd.TypeInfoDeclaration;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
5 import dmd.ClassInfoDeclaration;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
6 import dmd.TypeClass;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
7 import dmd.TY;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
8 import dmd.Util;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
9 import dmd.backend.dt_t;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
10 import dmd.backend.Util;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
11 import dmd.backend.TYM;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
12 import dmd.backend.Symbol;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
13
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
14 class TypeInfoClassDeclaration : TypeInfoDeclaration
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
15 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
16 this(Type tinfo)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
17 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
18 super(tinfo, 0);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
19 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
20
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
21 void toDt(dt_t** pdt)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
22 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
23 //printf("TypeInfoClassDeclaration::toDt() %s\n", tinfo->toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
24 dtxoff(pdt, Type.typeinfoclass.toVtblSymbol(), 0, TYnptr); // vtbl for TypeInfoClass
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
25 dtdword(pdt, 0); // monitor
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
26
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
27 assert(tinfo.ty == Tclass);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
28
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
29 TypeClass tc = cast(TypeClass)tinfo;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
30
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
31 if (!tc.sym.vclassinfo)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
32 tc.sym.vclassinfo = new ClassInfoDeclaration(tc.sym);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
33
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
34 Symbol* s = tc.sym.vclassinfo.toSymbol();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
35 assert(s.Sxtrnnum == 0);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
36
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
37 dtxoff(pdt, s, 0, TYnptr); // ClassInfo for tinfo
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
38 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
39 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
40