diff options
| author | Stefan Monnier | 2004-04-14 20:45:02 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2004-04-14 20:45:02 +0000 |
| commit | 5dc0561826f0574327f69116f5ef54362d8ec92f (patch) | |
| tree | c10107b0694c6a0ebd7eb610f6679320a940841c /src | |
| parent | a080ff233cc81c42c70faa374ac0f016dd61db58 (diff) | |
| download | emacs-5dc0561826f0574327f69116f5ef54362d8ec92f.tar.gz emacs-5dc0561826f0574327f69116f5ef54362d8ec92f.zip | |
(fix_command): Use XDCR.
Diffstat (limited to 'src')
| -rw-r--r-- | src/callint.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/callint.c b/src/callint.c index 1d7d6f9f89f..50090db8b28 100644 --- a/src/callint.c +++ b/src/callint.c | |||
| @@ -209,7 +209,7 @@ fix_command (input, values) | |||
| 209 | Lisp_Object intail, valtail; | 209 | Lisp_Object intail, valtail; |
| 210 | for (intail = Fcdr (input), valtail = values; | 210 | for (intail = Fcdr (input), valtail = values; |
| 211 | CONSP (valtail); | 211 | CONSP (valtail); |
| 212 | intail = Fcdr (intail), valtail = Fcdr (valtail)) | 212 | intail = Fcdr (intail), valtail = XCDR (valtail)) |
| 213 | { | 213 | { |
| 214 | Lisp_Object elt; | 214 | Lisp_Object elt; |
| 215 | elt = Fcar (intail); | 215 | elt = Fcar (intail); |