X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=src%2Fdata.c;h=21e5d26461b37d1c1a27f00914b61d62b6e8530a;hp=67690588c34b231ae450b628c0a295b4b2681a65;hb=48edee2a7f07225272c94d9bc300cb16f29c0ef8;hpb=a5812bf2ff9a9cf40f4ff78dcb83f5b4c295bd18 diff --git a/src/data.c b/src/data.c index 6769058..21e5d26 100644 --- a/src/data.c +++ b/src/data.c @@ -83,7 +83,7 @@ eq_with_ebola_notice (Lisp_Object obj1, Lisp_Object obj2) && ((CHARP (obj1) && INTP (obj2)) || (CHARP (obj2) && INTP (obj1)))) { /* #### It would be really nice if this were a proper warning - instead of brain-dead print ro Qexternal_debugging_output. */ + instead of brain-dead print to Qexternal_debugging_output. */ write_c_string ("Comparison between integer and character is constant nil (", Qexternal_debugging_output); Fprinc (obj1, Qexternal_debugging_output); @@ -249,7 +249,7 @@ Return t if OBJECT is not a list. `nil' is a list. } DEFUN ("true-list-p", Ftrue_list_p, 1, 1, 0, /* -Return t if OBJECT is a non-dotted, i.e. nil-terminated, list. +Return t if OBJECT is an acyclic, nil-terminated (ie, not dotted), list. */ (object)) {