diff options
Diffstat (limited to 'x.c')
-rwxr-xr-x[-rw-r--r--] | x.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -665,8 +665,8 @@ void scm2XPoint(signp, dat, ipr, pos, s_caller) ASRTGO(ARRAYP(dat) && 1==ARRAY_NDIM(dat) && 0==ARRAY_DIMS(dat)[0].lbnd && 1==ARRAY_DIMS(dat)[0].ubnd, badarg); - x = aref(dat, MAKINUM(0)); - y = aref(dat, MAKINUM(1)); + x = aref(dat, MAKINUM(0L)); + y = aref(dat, MAKINUM(1L)); break; } ASRTGO(INUMP(x) && INUMP(y), badarg); @@ -2147,7 +2147,7 @@ SCM xldraw_lines(sdbl, sgc, sargs, funcod, s_caller) goto loop; } } else { - unsigned long rabase; + void* rabase; ASRTGO(NULLP(sargs), wna); rabase = scm_base_addr(sarg, s_caller); switch (funcod) { |