Mercurial > hg > xemacs-beta

comparison src/lread.c @ 233:52952cbfc5b5 r20-5b15

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b15
author cvs
date Mon, 13 Aug 2007 10:14:14 +0200
parents 557eaa0339bf
children 41f2f0e326e9
comparison
equal deleted inserted replaced
232:aa6545ea0638 233:52952cbfc5b5
1207 { 1207 {
1208 REGISTER Lisp_Object tail, prev, newelt; 1208 REGISTER Lisp_Object tail, prev, newelt;
1209 REGISTER Lisp_Object tem, tem2; 1209 REGISTER Lisp_Object tem, tem2;
1210 int foundit; 1210 int foundit;
1211 1211
1212 #if !defined(LOADHIST_DUMPED)
1212 /* Don't bother recording anything for preloaded files. */ 1213 /* Don't bother recording anything for preloaded files. */
1213 if (purify_flag) 1214 if (purify_flag)
1214 return; 1215 return;
1216 #endif
1215 1217
1216 tail = Vload_history; 1218 tail = Vload_history;
1217 prev = Qnil; 1219 prev = Qnil;
1218 foundit = 0; 1220 foundit = 0;
1219 while (!NILP (tail)) 1221 while (!NILP (tail))