Mercurial > hg > xemacs-beta
comparison src/fileio.c @ 5438:8d29f1c4bb98
Merge with 21.5 trunk.
author | Mats Lidell <matsl@xemacs.org> |
---|---|
date | Fri, 26 Nov 2010 06:43:36 +0100 |
parents | 308d34e9f07d c096d8051f89 |
children | 0af042a0c116 |
comparison
equal
deleted
inserted
replaced
5437:002cb5224e4f | 5438:8d29f1c4bb98 |
---|---|
3290 GC_EXTERNAL_LIST_LOOP_2 (p, Vafter_insert_file_functions) | 3290 GC_EXTERNAL_LIST_LOOP_2 (p, Vafter_insert_file_functions) |
3291 { | 3291 { |
3292 Lisp_Object insval = call1 (p, make_int (inserted)); | 3292 Lisp_Object insval = call1 (p, make_int (inserted)); |
3293 if (!NILP (insval)) | 3293 if (!NILP (insval)) |
3294 { | 3294 { |
3295 CHECK_NATNUM (insval); | 3295 check_integer_range (insval, Qzero, make_int (EMACS_INT_MAX)); |
3296 inserted = XINT (insval); | 3296 inserted = XINT (insval); |
3297 } | 3297 } |
3298 } | 3298 } |
3299 END_GC_EXTERNAL_LIST_LOOP (p); | 3299 END_GC_EXTERNAL_LIST_LOOP (p); |
3300 } | 3300 } |