From fd5f104f287427fee885583bc398c137674e6af0 Mon Sep 17 00:00:00 2001 From: Bryan Newbold Date: Fri, 3 Mar 2017 00:56:40 -0800 Subject: New upstream version 5f2 --- ramap.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) mode change 100644 => 100755 ramap.c (limited to 'ramap.c') diff --git a/ramap.c b/ramap.c old mode 100644 new mode 100755 index 0cedfad..d406f9e --- 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); -- cgit v1.2.3