aboutsummaryrefslogtreecommitdiffstats
path: root/ramap.c
diff options
context:
space:
mode:
authorBryan Newbold <bnewbold@robocracy.org>2017-03-03 00:56:40 -0800
committerBryan Newbold <bnewbold@robocracy.org>2017-08-02 00:09:46 -0700
commit879f4fa041cfdefee655eb877f1a91f86a9c62b7 (patch)
treebc68ac058e5d0a7cf8e7815cbe1070fd60e75589 /ramap.c
parentd13fcf5c0bd68f67059b2561c28c40b55e1117a3 (diff)
downloadscm-879f4fa041cfdefee655eb877f1a91f86a9c62b7.tar.gz
scm-879f4fa041cfdefee655eb877f1a91f86a9c62b7.zip
New upstream version 5f2
Diffstat (limited to 'ramap.c')
-rwxr-xr-x[-rw-r--r--]ramap.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/ramap.c b/ramap.c
index 0cedfad..d406f9e 100644..100755
--- a/ramap.c
+++ b/ramap.c
@@ -595,7 +595,7 @@ SCM sc2array(s, ra, prot)
if (NUMBERP(s)) break;
goto mismatch;
#endif
- mismatch: ARRAY_V(res) = make_vector(MAKINUM(1), s);
+ mismatch: ARRAY_V(res) = make_vector(MAKINUM(1L), s);
return res;
}
aset(ARRAY_V(res), s, INUM0);