diff options
author | Bryan Newbold <bnewbold@robocracy.org> | 2017-03-03 00:56:40 -0800 |
---|---|---|
committer | Bryan Newbold <bnewbold@robocracy.org> | 2017-08-02 00:09:46 -0700 |
commit | 879f4fa041cfdefee655eb877f1a91f86a9c62b7 (patch) | |
tree | bc68ac058e5d0a7cf8e7815cbe1070fd60e75589 /x.c | |
parent | d13fcf5c0bd68f67059b2561c28c40b55e1117a3 (diff) | |
download | scm-879f4fa041cfdefee655eb877f1a91f86a9c62b7.tar.gz scm-879f4fa041cfdefee655eb877f1a91f86a9c62b7.zip |
New upstream version 5f2
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) { |