Mercurial > projects > ldc
view lphobos/typeinfo2/ti_AC.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 | 79c9ac745fbc |
children |
line wrap: on
line source
module typeinfo2.ti_AC; // Object[] class TypeInfo_AC : TypeInfo { hash_t getHash(void *p) { Object[] s = *cast(Object[]*)p; hash_t hash = 0; foreach (Object o; s) { if (o) hash += o.toHash(); } return hash; } int equals(void *p1, void *p2) { Object[] s1 = *cast(Object[]*)p1; Object[] s2 = *cast(Object[]*)p2; if (s1.length == s2.length) { for (size_t u = 0; u < s1.length; u++) { Object o1 = s1[u]; Object o2 = s2[u]; // Do not pass null's to Object.opEquals() if (o1 is o2 || (!(o1 is null) && !(o2 is null) && o1.opEquals(o2))) continue; return 0; } return 1; } return 0; } int compare(void *p1, void *p2) { Object[] s1 = *cast(Object[]*)p1; Object[] s2 = *cast(Object[]*)p2; int c; c = cast(int)s1.length - cast(int)s2.length; if (c == 0) { for (size_t u = 0; u < s1.length; u++) { Object o1 = s1[u]; Object o2 = s2[u]; if (o1 is o2) continue; // Regard null references as always being "less than" if (o1) { if (!o2) { c = 1; break; } c = o1.opCmp(o2); if (c) break; } else { c = -1; break; } } } return c; } size_t tsize() { return (Object[]).sizeof; } uint flags() { return 1; } TypeInfo next() { return typeid(Object); } }