Mercurial > emacs
comparison src/lread.c @ 96361:a99299e4d2de
American English spelling fix.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Fri, 27 Jun 2008 02:13:38 +0000 |
parents | 353a9f7910cf |
children | c3309dba6542 |
comparison
equal
deleted
inserted
replaced
96360:b4fbe199423a | 96361:a99299e4d2de |
---|---|
3102 else if (VECTORP (subtree)) | 3102 else if (VECTORP (subtree)) |
3103 length = ASIZE (subtree); | 3103 length = ASIZE (subtree); |
3104 else | 3104 else |
3105 /* An unknown pseudovector may contain non-Lisp fields, so we | 3105 /* An unknown pseudovector may contain non-Lisp fields, so we |
3106 can't just blindly traverse all its fields. We used to call | 3106 can't just blindly traverse all its fields. We used to call |
3107 `Flength' which signalled `sequencep', so I just preserved this | 3107 `Flength' which signaled `sequencep', so I just preserved this |
3108 behavior. */ | 3108 behavior. */ |
3109 wrong_type_argument (Qsequencep, subtree); | 3109 wrong_type_argument (Qsequencep, subtree); |
3110 | 3110 |
3111 for (i = 0; i < length; i++) | 3111 for (i = 0; i < length; i++) |
3112 SUBSTITUTE (AREF (subtree, i), | 3112 SUBSTITUTE (AREF (subtree, i), |