Mercurial > hg > xemacs-beta
comparison src/floatfns.c @ 4962:e813cf16c015
merge
author | Ben Wing <ben@xemacs.org> |
---|---|
date | Mon, 01 Feb 2010 05:29:05 -0600 |
parents | 304aebb79cd3 6ef8256a020a |
children | b5df3737028a |
comparison
equal
deleted
inserted
replaced
4961:b90f8cf474e0 | 4962:e813cf16c015 |
---|---|
174 { | 174 { |
175 return Qnil; | 175 return Qnil; |
176 } | 176 } |
177 | 177 |
178 static int | 178 static int |
179 float_equal (Lisp_Object obj1, Lisp_Object obj2, int UNUSED (depth)) | 179 float_equal (Lisp_Object obj1, Lisp_Object obj2, int UNUSED (depth), |
180 int UNUSED (foldcase)) | |
180 { | 181 { |
181 return (extract_float (obj1) == extract_float (obj2)); | 182 return (extract_float (obj1) == extract_float (obj2)); |
182 } | 183 } |
183 | 184 |
184 static Hashcode | 185 static Hashcode |