comparison src/alloc.c @ 648:70b112526394

*** empty log message ***
author Jim Blandy <jimb@redhat.com>
date Mon, 18 May 1992 08:14:41 +0000
parents 40b255f55df3
children 540b047ece4d
comparison
equal deleted inserted replaced
647:529171c8b71c 648:70b112526394
1075 1075
1076 /* Don't keep command history around forever */ 1076 /* Don't keep command history around forever */
1077 tem = Fnthcdr (make_number (30), Vcommand_history); 1077 tem = Fnthcdr (make_number (30), Vcommand_history);
1078 if (CONSP (tem)) 1078 if (CONSP (tem))
1079 XCONS (tem)->cdr = Qnil; 1079 XCONS (tem)->cdr = Qnil;
1080
1080 /* Likewise for undo information. */ 1081 /* Likewise for undo information. */
1081 { 1082 {
1082 register struct buffer *nextb = all_buffers; 1083 register struct buffer *nextb = all_buffers;
1083 1084
1084 while (nextb) 1085 while (nextb)
1085 { 1086 {
1086 nextb->undo_list 1087 /* If a buffer's undo list is Qt, that means that undo is
1087 = truncate_undo_list (nextb->undo_list, undo_threshold, 1088 turned off in that buffer. Calling truncate_undo_list on
1088 undo_high_threshold); 1089 Qt tends to return NULL, which effectively turns undo back on.
1090 So don't call truncate_undo_list if undo_list is Qt. */
1091 if (! EQ (nextb->undo_list, Qt))
1092 nextb->undo_list
1093 = truncate_undo_list (nextb->undo_list, undo_threshold,
1094 undo_high_threshold);
1089 nextb = nextb->next; 1095 nextb = nextb->next;
1090 } 1096 }
1091 } 1097 }
1092 1098
1093 gc_in_progress = 1; 1099 gc_in_progress = 1;