summaryrefslogtreecommitdiffstats
path: root/x.c
diff options
context:
space:
mode:
authorThomas Bushnell <tb@debian.org>2006-10-23 23:31:59 -0700
committerBryan Newbold <bnewbold@robocracy.org>2017-02-20 00:05:35 -0800
commit906cc4f0899080f1b832af98b7ccbcc257b8a64e (patch)
tree14e3ec231debdca4da9c1a3ccc0536033c1c8a4b /x.c
parent3d573fa54db0fdcae8b2a20356faa46c8e335206 (diff)
parent50eb784bfcf15ee3c6b0b53d747db92673395040 (diff)
downloadscm-906cc4f0899080f1b832af98b7ccbcc257b8a64e.tar.gz
scm-906cc4f0899080f1b832af98b7ccbcc257b8a64e.zip
Import Debian changes 5e3-1debian/5e3-1
scm (5e3-1) unstable; urgency=low * New upstream release. * debian/control (Architecture): Add ia64 to list of supported archs. Now everything but s390 is listed. (Closes: #335980) (Build-Depends): Require at least version 3a4 of slib. * Change to continue.h from version 5e1-2 repeated here. * Change to xgen.scm from version 5e2-4 repeated here. * Change to scm.1 from version 5e2-4 repeated here.
Diffstat (limited to 'x.c')
-rw-r--r--x.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/x.c b/x.c
index 84c4455..e062ba9 100644
--- a/x.c
+++ b/x.c
@@ -675,12 +675,12 @@ void scm2XPoint(signp, dat, ipr, pos, s_caller)
x = VELTS(dat)[0];
y = VELTS(dat)[1];
break;
- case tc7_uvect: case tc7_ivect:
+ case tc7_VfixN32: case tc7_VfixZ32:
ASRTGO(2==LENGTH(dat), badarg);
x = MAKINUM(((long *)VELTS(dat))[0]);
y = MAKINUM(((long *)VELTS(dat))[1]);
break;
- case tc7_svect:
+ case tc7_VfixZ16:
ASRTGO(2==LENGTH(dat), badarg);
x = MAKINUM(((short *)VELTS(dat))[0]);
y = MAKINUM(((short *)VELTS(dat))[1]);
@@ -742,7 +742,7 @@ int scm2xpointslen(sara, s_caller)
if (!((1==(adm[1].ubnd - adm[1].lbnd))
&& (1==adm[1].inc)
&& ARRAY_CONTP(sara)
- && (tc7_svect==TYP7(ARRAY_V(sara))))) return -1;
+ && (tc7_VfixZ16==TYP7(ARRAY_V(sara))))) return -1;
len = 1 + adm[0].ubnd - adm[0].lbnd;
if (len < 0) return 0;
return len;
@@ -1337,7 +1337,7 @@ SCM x_free_color_cells(scmap, spxls, sargs)
unsigned int planes = 0;
ASRTER(NIMP(scmap) && COLORMAPP(scmap), scmap, ARG1, s_x_free_color_cells);
xcm = COLORMAP(scmap);
- ASRTER(NIMP(spxls) && (TYP7(spxls)==tc7_uvect), spxls, ARG2,
+ ASRTER(NIMP(spxls) && (TYP7(spxls)==tc7_VfixN32), spxls, ARG2,
s_x_free_color_cells);
switch (ilength(sargs) + 2) {
default: wta(sargs, (char *)WNA, s_x_free_color_cells);