comparison src/device.c @ 5120:d1247f3cc363 ben-lisp-object

latest work on lisp-object workspace; more changes eliminating LCRECORD in place of LISP_OBJECT; now compiles and runs.
author Ben Wing <ben@xemacs.org>
date Mon, 28 Dec 2009 01:15:52 -0600
parents e0db3c197671
children 623d57b7fbe8
comparison
equal deleted inserted replaced
5119:d877c14318b3 5120:d1247f3cc363
199 } 199 }
200 200
201 static void 201 static void
202 nuke_all_device_slots (struct device *d, Lisp_Object zap) 202 nuke_all_device_slots (struct device *d, Lisp_Object zap)
203 { 203 {
204 ZERO_LCRECORD (d); 204 ZERO_LISP_OBJECT (d);
205 205
206 #define MARKED_SLOT(x) d->x = zap; 206 #define MARKED_SLOT(x) d->x = zap;
207 #include "devslots.h" 207 #include "devslots.h"
208 } 208 }
209 209