Mercurial > hg > xemacs-beta
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 |