Mercurial > projects > ldc
annotate tango/lib/compiler/llvmdc/typeinfo/ti_Acfloat.d @ 213:7816aafeea3c trunk
[svn r229] Updated the object.d implementation to the latest Tango.
Fixed a bunch of the built-in typeinfos for arrays, they did not inherit TypeInfo_Array.
Applied patch to tango/text/convert/Layout.d by fvbommel, closes #47 .
Cleaned up some type code.
Replaced uses of llvm::Type with LLType (a typedef), same for Value and Constant.
Fixed a few cases where typeinfo for user structs could be emitted multiple times, seems to still be some cases of this :/
author | lindquist |
---|---|
date | Fri, 30 May 2008 19:32:04 +0200 |
parents | 1700239cab2e |
children |
rev | line source |
---|---|
132 | 1 /* |
2 * Copyright (C) 2004-2005 by Digital Mars, www.digitalmars.com | |
3 * Written by Walter Bright | |
4 * | |
5 * This software is provided 'as-is', without any express or implied | |
6 * warranty. In no event will the authors be held liable for any damages | |
7 * arising from the use of this software. | |
8 * | |
9 * Permission is granted to anyone to use this software for any purpose, | |
10 * including commercial applications, and to alter it and redistribute it | |
11 * freely, in both source and binary form, subject to the following | |
12 * restrictions: | |
13 * | |
14 * o The origin of this software must not be misrepresented; you must not | |
15 * claim that you wrote the original software. If you use this software | |
16 * in a product, an acknowledgment in the product documentation would be | |
17 * appreciated but is not required. | |
18 * o Altered source versions must be plainly marked as such, and must not | |
19 * be misrepresented as being the original software. | |
20 * o This notice may not be removed or altered from any source | |
21 * distribution. | |
22 */ | |
23 | |
24 module typeinfo.ti_Acfloat; | |
25 | |
26 private import typeinfo.ti_cfloat; | |
27 | |
28 // cfloat[] | |
29 | |
213
7816aafeea3c
[svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents:
132
diff
changeset
|
30 class TypeInfo_Aq : TypeInfo_Array |
132 | 31 { |
32 char[] toString() { return "cfloat[]"; } | |
33 | |
34 hash_t getHash(void *p) | |
35 { cfloat[] s = *cast(cfloat[]*)p; | |
36 size_t len = s.length; | |
37 cfloat *str = s.ptr; | |
38 hash_t hash = 0; | |
39 | |
40 while (len) | |
41 { | |
42 hash *= 9; | |
43 hash += (cast(uint *)str)[0]; | |
44 hash += (cast(uint *)str)[1]; | |
45 str++; | |
46 len--; | |
47 } | |
48 | |
49 return hash; | |
50 } | |
51 | |
52 int equals(void *p1, void *p2) | |
53 { | |
54 cfloat[] s1 = *cast(cfloat[]*)p1; | |
55 cfloat[] s2 = *cast(cfloat[]*)p2; | |
56 size_t len = s1.length; | |
57 | |
58 if (len != s2.length) | |
59 return 0; | |
60 for (size_t u = 0; u < len; u++) | |
61 { | |
62 int c = TypeInfo_q._equals(s1[u], s2[u]); | |
63 if (c == 0) | |
64 return 0; | |
65 } | |
66 return 1; | |
67 } | |
68 | |
69 int compare(void *p1, void *p2) | |
70 { | |
71 cfloat[] s1 = *cast(cfloat[]*)p1; | |
72 cfloat[] s2 = *cast(cfloat[]*)p2; | |
73 size_t len = s1.length; | |
74 | |
75 if (s2.length < len) | |
76 len = s2.length; | |
77 for (size_t u = 0; u < len; u++) | |
78 { | |
79 int c = TypeInfo_q._compare(s1[u], s2[u]); | |
80 if (c) | |
81 return c; | |
82 } | |
83 if (s1.length < s2.length) | |
84 return -1; | |
85 else if (s1.length > s2.length) | |
86 return 1; | |
87 return 0; | |
88 } | |
89 | |
90 size_t tsize() | |
91 { | |
92 return (cfloat[]).sizeof; | |
93 } | |
94 | |
95 uint flags() | |
96 { | |
97 return 1; | |
98 } | |
99 | |
100 TypeInfo next() | |
101 { | |
102 return typeid(cfloat); | |
103 } | |
104 } |