diff options
Diffstat (limited to 'src/fns.c')
| -rw-r--r-- | src/fns.c | 2 |
1 files changed, 0 insertions, 2 deletions
| @@ -1852,10 +1852,8 @@ internal_equal (o1, o2, depth) | |||
| 1852 | 1852 | ||
| 1853 | switch (XTYPE (o1)) | 1853 | switch (XTYPE (o1)) |
| 1854 | { | 1854 | { |
| 1855 | #ifdef LISP_FLOAT_TYPE | ||
| 1856 | case Lisp_Float: | 1855 | case Lisp_Float: |
| 1857 | return (extract_float (o1) == extract_float (o2)); | 1856 | return (extract_float (o1) == extract_float (o2)); |
| 1858 | #endif | ||
| 1859 | 1857 | ||
| 1860 | case Lisp_Cons: | 1858 | case Lisp_Cons: |
| 1861 | if (!internal_equal (XCAR (o1), XCAR (o2), depth + 1)) | 1859 | if (!internal_equal (XCAR (o1), XCAR (o2), depth + 1)) |