Mercurial > projects > ldc
view lphobos/typeinfo2/ti_Ashort.d @ 1168:ab186e535e72
A different fix to #218 and DMD2682 that does not lead to constant folding regressions.
Fixes run/const_15, run/c/const_16_B.
The price is removing the lvalueness of struct literals. If it turns out too
much code depends on this behavior or we don't want to break with DMD, we
could keep struct literals as lvalues and instead convert struct literals used
as expression initializers into struct initializers.
author | Christian Kamm <kamm incasoftware de> |
---|---|
date | Sun, 29 Mar 2009 11:43:45 +0200 |
parents | 362825278842 |
children |
line wrap: on
line source
module typeinfo2.ti_Ashort; extern(C) int memcmp(void*,void*,size_t); // short[] class TypeInfo_As : TypeInfo { char[] toString() { return "short[]"; } hash_t getHash(void *p) { short[] s = *cast(short[]*)p; size_t len = s.length; short *str = s.ptr; hash_t hash = 0; while (1) { switch (len) { case 0: return hash; case 1: hash *= 9; hash += *cast(ushort *)str; return hash; default: hash *= 9; hash += *cast(uint *)str; str += 2; len -= 2; break; } } return hash; } int equals(void *p1, void *p2) { short[] s1 = *cast(short[]*)p1; short[] s2 = *cast(short[]*)p2; return s1.length == s2.length && memcmp(cast(void *)s1, cast(void *)s2, s1.length * short.sizeof) == 0; } int compare(void *p1, void *p2) { short[] s1 = *cast(short[]*)p1; short[] s2 = *cast(short[]*)p2; size_t len = s1.length; if (s2.length < len) len = s2.length; for (size_t u = 0; u < len; u++) { int result = s1[u] - s2[u]; if (result) return result; } return cast(int)s1.length - cast(int)s2.length; } size_t tsize() { return (short[]).sizeof; } uint flags() { return 1; } TypeInfo next() { return typeid(short); } } // ushort[] class TypeInfo_At : TypeInfo_As { char[] toString() { return "ushort[]"; } int compare(void *p1, void *p2) { ushort[] s1 = *cast(ushort[]*)p1; ushort[] s2 = *cast(ushort[]*)p2; size_t len = s1.length; if (s2.length < len) len = s2.length; for (size_t u = 0; u < len; u++) { int result = s1[u] - s2[u]; if (result) return result; } return cast(int)s1.length - cast(int)s2.length; } TypeInfo next() { return typeid(ushort); } } // wchar[] class TypeInfo_Au : TypeInfo_At { char[] toString() { return "wchar[]"; } TypeInfo next() { return typeid(wchar); } }