diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2013-06-15 00:41:42 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2013-06-15 00:41:42 -0700 |
| commit | 210272cebb7051a9e06b80cd10f17e6bd66e4a2e (patch) | |
| tree | 836da3a4b9f04edeead4fbbb202c4036576c5745 /src/fns.c | |
| parent | b86a85ca5e26d6d61041756e109b9b0473d51518 (diff) | |
| download | emacs-210272cebb7051a9e06b80cd10f17e6bd66e4a2e.tar.gz | |
* fns.c (Fcopy_sequence): Simplify XTYPE calculation.
Diffstat (limited to 'src/fns.c')
| -rw-r--r-- | src/fns.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/fns.c b/src/fns.c index 06d4e358f10..7a230e61a3c 100644 --- a/src/fns.c +++ b/src/fns.c @@ -445,7 +445,7 @@ with the original. */) if (!CONSP (arg) && !VECTORP (arg) && !STRINGP (arg)) wrong_type_argument (Qsequencep, arg); - return concat (1, &arg, CONSP (arg) ? Lisp_Cons : XTYPE (arg), 0); + return concat (1, &arg, XTYPE (arg), 0); } /* This structure holds information of an argument of `concat' that is |