ClearTypes

AddStruct ST
AppendMember char, a
AppendMember int, y
SizeofType ST
VisitType ST

AddType "unsigned int", DWORD
SizeofType DWORD

AddStruct _FILETIME
AppendMember DWORD, dwLoDateTime
AppendMember DWORD, dwHighDateTime
AddType _FILETIME*, LPFILETIME
SizeofType _FILETIME

AddUnion UT
AppendMember char, a
AppendMember short, b
AppendMember int, c
AppendMember "long long", d
SizeofType UT
VisitType UT

AddStruct BLUB
AppendMember short, c
AppendMember int, d, 2

AddStruct TEST
AppendMember int, a
AppendMember char, b
AppendMember BLUB, e
AppendMember int, f
SizeofType TEST
VisitType TEST

AddStruct POINTEE
AppendMember int, n
AppendMember TEST, t

AddStruct POINTER
AppendMember int, x
AppendMember POINTEE*, p
AppendMember int, y
VisitType POINTER, 0, 1

AddStruct LIST_ENTRY
AppendMember int, x
AppendMember LIST_ENTRY*, next
AppendMember int, y
VisitType LIST_ENTRY, 0, 4

AddStruct STRINGTEST
AppendMember "const char*", str
AppendMember "const wchar_t*", wstr
VisitType STRINGTEST

AddFunction strcasecmp, int, cdecl
AppendArg "const char*", s1
AppendArg "const char*", s2