fix bad typing for 64 bits (fix from Bernd).

This commit is contained in:
Vítor Santos Costa 2011-12-05 21:04:31 +00:00
parent d75cf3118a
commit ad618c5bcb

View File

@ -637,7 +637,7 @@ CreateStaticArray(AtomEntry *ae, Int dim, static_array_types type, CODEADDR star
p->ArrayEArity = -dim;
p->ArrayType = type;
if (start_addr == NULL) {
int i;
Int i;
AllocateStaticArraySpace(p, type, dim PASS_REGS);
if (p->ValueOfVE.ints == NULL) {
@ -790,7 +790,7 @@ ClearStaticArray(StaticArrayEntry *pp)
WRITE_LOCK(pp->ArRWLock);
switch(type) {
case array_of_ints:
memset((void *)pp->ValueOfVE.ints,0,sizeof(int)*dim);
memset((void *)pp->ValueOfVE.ints,0,sizeof(Int)*dim);
break;
case array_of_chars:
memset((void *)pp->ValueOfVE.chars,0,sizeof(char)*dim);