Mercurial > emacs
diff src/editfns.c @ 25662:0a7261c1d487
Use XCAR, XCDR, and XFLOAT_DATA instead of explicit member access.
| author | Ken Raeburn <raeburn@raeburn.org> |
|---|---|
| date | Mon, 13 Sep 1999 02:23:04 +0000 |
| parents | b278da3accef |
| children | 8f59abd3a02b |
line wrap: on
line diff
--- a/src/editfns.c Sun Sep 12 20:22:02 1999 +0000 +++ b/src/editfns.c Mon Sep 13 02:23:04 1999 +0000 @@ -2288,13 +2288,13 @@ register Lisp_Object tem; int obegv, ozv; - buf = XBUFFER (XCONS (data)->car); - - data = XCONS (data)->cdr; - - tem = XCONS (data)->car; + buf = XBUFFER (XCAR (data)); + + data = XCDR (data); + + tem = XCAR (data); newhead = XINT (tem); - tem = XCONS (data)->cdr; + tem = XCDR (data); newtail = XINT (tem); if (newhead + newtail > BUF_Z (buf) - BUF_BEG (buf)) { @@ -2761,7 +2761,7 @@ if (INTEGERP (args[n])) sprintf (p, this_format, XINT (args[n])); else - sprintf (p, this_format, XFLOAT (args[n])->data); + sprintf (p, this_format, XFLOAT_DATA (args[n])); if (p > buf && multibyte