Mercurial > hg > xemacs-beta
comparison src/fns.c @ 359:8e84bee8ddd0 r21-1-9
Import from CVS: tag r21-1-9
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:57:55 +0200 |
parents | 851ff35f137f |
children | cc15677e0335 |
comparison
equal
deleted
inserted
replaced
358:fed6e0f6a03a | 359:8e84bee8ddd0 |
---|---|
1925 */ | 1925 */ |
1926 int | 1926 int |
1927 plists_differ (Lisp_Object a, Lisp_Object b, int nil_means_not_present, | 1927 plists_differ (Lisp_Object a, Lisp_Object b, int nil_means_not_present, |
1928 int laxp, int depth) | 1928 int laxp, int depth) |
1929 { | 1929 { |
1930 int eqp = (depth == -1); /* -1 as depth means us eq, not equal. */ | 1930 int eqp = (depth == -1); /* -1 as depth means use eq, not equal. */ |
1931 int la, lb, m, i, fill; | 1931 int la, lb, m, i, fill; |
1932 Lisp_Object *keys, *vals; | 1932 Lisp_Object *keys, *vals; |
1933 char *flags; | 1933 char *flags; |
1934 Lisp_Object rest; | 1934 Lisp_Object rest; |
1935 | 1935 |