Mercurial > hg > xemacs-beta

comparison src/data.c @ 371:cc15677e0335 r21-2b1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2b1
author cvs
date Mon, 13 Aug 2007 11:03:08 +0200
parents 1d62742628b6
children 8626e4521993
comparison
equal deleted inserted replaced
370:bd866891f083 371:cc15677e0335
1190 atoi do this anyway, so we might as well make Emacs lisp consistent. */ 1190 atoi do this anyway, so we might as well make Emacs lisp consistent. */
1191 while (*p == ' ' || *p == '\t') 1191 while (*p == ' ' || *p == '\t')
1192 p++; 1192 p++;
1193 1193
1194 #ifdef LISP_FLOAT_TYPE 1194 #ifdef LISP_FLOAT_TYPE
1195 if (isfloat_string (p) && b == 10) 1195 if (isfloat_string (p))
1196 return make_float (atof (p)); 1196 return make_float (atof (p));
1197 #endif /* LISP_FLOAT_TYPE */ 1197 #endif /* LISP_FLOAT_TYPE */
1198 1198
1199 if (b == 10) 1199 if (b == 10)
1200 { 1200 {
1967 1967
1968 DEFUN ("make-weak-list", Fmake_weak_list, 0, 1, 0, /* 1968 DEFUN ("make-weak-list", Fmake_weak_list, 0, 1, 0, /*
1969 Return a new weak list object of type TYPE. 1969 Return a new weak list object of type TYPE.
1970 A weak list object is an object that contains a list. This list behaves 1970 A weak list object is an object that contains a list. This list behaves
1971 like any other list except that its elements do not count towards 1971 like any other list except that its elements do not count towards
1972 garbage collection -- if the only pointer to an object is inside a weak 1972 garbage collection -- if the only pointer to an object in inside a weak
1973 list (other than pointers in similar objects such as weak hash tables), 1973 list (other than pointers in similar objects such as weak hash tables),
1974 the object is garbage collected and automatically removed from the list. 1974 the object is garbage collected and automatically removed from the list.
1975 This is used internally, for example, to manage the list holding the 1975 This is used internally, for example, to manage the list holding the
1976 children of an extent -- an extent that is unused but has a parent will 1976 children of an extent -- an extent that is unused but has a parent will
1977 still be reclaimed, and will automatically be removed from its parent's 1977 still be reclaimed, and will automatically be removed from its parent's