summaryrefslogtreecommitdiffstats
path: root/x.c
diff options
context:
space:
mode:
Diffstat (limited to 'x.c')
-rwxr-xr-x[-rw-r--r--]x.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/x.c b/x.c
index d619724..e6db874 100644..100755
--- a/x.c
+++ b/x.c
@@ -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) {