# HG changeset patch # User John Paul Wallington # Date 1082420266 0 # Node ID 937db08d4048a13f1e77822d96afbc15e685b08c # Parent 08b0ee9a9b3503b3ba10dfb42caed451f06c59f0 (Fassoc, Feql): Fix indentation. diff -r 08b0ee9a9b35 -r 937db08d4048 src/fns.c --- a/src/fns.c Mon Apr 19 23:32:17 2004 +0000 +++ b/src/fns.c Tue Apr 20 00:17:46 2004 +0000 @@ -1560,7 +1560,7 @@ DEFUN ("assoc", Fassoc, Sassoc, 2, 2, 0, doc: /* Return non-nil if KEY is `equal' to the car of an element of LIST. The value is actually the first element of LIST whose car equals KEY. */) - (key, list) + (key, list) Lisp_Object key, list; { Lisp_Object result, car; @@ -2138,7 +2138,7 @@ DEFUN ("eql", Feql, Seql, 2, 2, 0, doc: /* Return t if the two args are the same Lisp object. Floating-point numbers of equal value are `eql', but they may not be `eq'. */) - (obj1, obj2) + (obj1, obj2) Lisp_Object obj1, obj2; { if (FLOATP (obj1))