Mercurial > projects > ldc
view runtime/internal/arrayInit.d @ 1650:40bd4a0d4870
Update to work with LLVM 2.7.
Removed use of dyn_cast, llvm no compiles
without exceptions and rtti by
default. We do need exceptions for the libconfig stuff, but rtti isn't
necessary (anymore).
Debug info needs to be rewritten, as in LLVM 2.7 the format has
completely changed. To have something to look at while rewriting, the
old code has been wrapped inside #ifndef DISABLE_DEBUG_INFO , this means
that you have to define this to compile at the moment.
Updated tango 0.99.9 patch to include updated EH runtime code, which is
needed for LLVM 2.7 as well.
author | Tomas Lindquist Olsen |
---|---|
date | Wed, 19 May 2010 12:42:32 +0200 |
parents | b3ba2c6ff038 |
children |
line wrap: on
line source
private import ldc.intrinsics; extern(C): int memcmp(void*,void*,size_t); size_t strlen(char*); version(LLVM64) alias llvm_memcpy_i64 llvm_memcpy; else alias llvm_memcpy_i32 llvm_memcpy; // per-element array init routines void _d_array_init_i16(ushort* a, size_t n, ushort v) { auto p = a; auto end = a+n; while (p !is end) *p++ = v; } void _d_array_init_i32(uint* a, size_t n, uint v) { auto p = a; auto end = a+n; while (p !is end) *p++ = v; } void _d_array_init_i64(ulong* a, size_t n, ulong v) { auto p = a; auto end = a+n; while (p !is end) *p++ = v; } void _d_array_init_float(float* a, size_t n, float v) { auto p = a; auto end = a+n; while (p !is end) *p++ = v; } void _d_array_init_double(double* a, size_t n, double v) { auto p = a; auto end = a+n; while (p !is end) *p++ = v; } void _d_array_init_real(real* a, size_t n, real v) { auto p = a; auto end = a+n; while (p !is end) *p++ = v; } void _d_array_init_cfloat(cfloat* a, size_t n, cfloat v) { auto p = a; auto end = a+n; while (p !is end) *p++ = v; } void _d_array_init_cdouble(cdouble* a, size_t n, cdouble v) { auto p = a; auto end = a+n; while (p !is end) *p++ = v; } void _d_array_init_creal(creal* a, size_t n, creal v) { auto p = a; auto end = a+n; while (p !is end) *p++ = v; } void _d_array_init_pointer(void** a, size_t n, void* v) { auto p = a; auto end = a+n; while (p !is end) *p++ = v; } void _d_array_init_mem(void* a, size_t na, void* v, size_t nv) { auto p = a; auto end = a + na*nv; while (p !is end) { llvm_memcpy(p,v,nv,0); p += nv; } } /* void _d_array_init(TypeInfo ti, void* a) { auto initializer = ti.next.init(); auto isize = initializer.length; auto q = initializer.ptr; if (isize == 1) memset(p, *cast(ubyte*)q, size); else if (isize == int.sizeof) { int init = *cast(int*)q; size /= int.sizeof; for (size_t u = 0; u < size; u++) { (cast(int*)p)[u] = init; } } else { for (size_t u = 0; u < size; u += isize) { memcpy(p + u, q, isize); } } }*/ // for array cast size_t _d_array_cast_len(size_t len, size_t elemsz, size_t newelemsz) { if (newelemsz == 1) { return len*elemsz; } else if ((len*elemsz) % newelemsz) { throw new Exception("Bad array cast"); } return (len*elemsz)/newelemsz; } // slice copy when assertions are enabled void _d_array_slice_copy(void* dst, size_t dstlen, void* src, size_t srclen) { if (dstlen != srclen) throw new Exception("lengths don't match for array copy"); else if (dst+dstlen <= src || src+srclen <= dst) llvm_memcpy(dst, src, dstlen, 0); else throw new Exception("overlapping array copy"); }