mirror of
https://github.com/ldc-developers/ldc.git
synced 2025-05-12 22:14:54 +03:00
d51e392b8d
Fixed some problems with the string runtime support functions. Fixed initialization of array of structs. Fixed slice assignment where LHS is slice but RHS is dynamic array. Fixed problems with result of assignment expressions. Fixed foreach problems with key type mismatches.
111 lines
1.9 KiB
D
111 lines
1.9 KiB
D
module internal.arrays;
|
|
|
|
private import llvm.intrinsic;
|
|
|
|
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_i1(bool* a, size_t n, bool v)
|
|
{
|
|
auto p = a;
|
|
auto end = a+n;
|
|
while (p !is end)
|
|
*p++ = v;
|
|
}
|
|
|
|
void _d_array_init_i8(ubyte* a, size_t n, ubyte v)
|
|
{
|
|
auto p = a;
|
|
auto end = a+n;
|
|
while (p !is end)
|
|
*p++ = v;
|
|
}
|
|
|
|
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_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;
|
|
}
|
|
}
|
|
|
|
// 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 % newelemsz) {
|
|
throw new Exception("Bad array cast");
|
|
}
|
|
return (len*elemsz)/newelemsz;
|
|
}
|
|
|
|
// creating args for main
|
|
void _d_main_args(uint n, char** args, ref char[][] res)
|
|
{
|
|
assert(res.length == n);
|
|
foreach(i,v; args[0..n])
|
|
{
|
|
res[i] = v[0 .. strlen(v)];
|
|
}
|
|
}
|