* doc.c (store_function_docstring): Fix pointer signedness mismatch.

diff --git a/src/ChangeLog b/src/ChangeLog
index f67923b..d2572e7 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2014-03-20  Paul Eggert  <eggert@cs.ucla.edu>
+
+       * doc.c (store_function_docstring): Fix pointer signedness mismatch.
+
 2014-03-20  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * doc.c (store_function_docstring): Warn when we don't know where to

diff --git a/src/doc.c b/src/doc.c
index 7e69316..b6a4cd0 100644 (file)
--- a/src/doc.c
+++ b/src/doc.c
@@ -537,7 +537,7 @@ store_function_docstring (Lisp_Object obj, ptrdiff_t offset)
        ASET (fun, COMPILED_DOC_STRING, make_number (offset));
       else
        message ("No docstring slot for %s",
-                SYMBOLP (obj) ? SDATA (SYMBOL_NAME (obj)) : "<anonymous>");
+                SYMBOLP (obj) ? SSDATA (SYMBOL_NAME (obj)) : "<anonymous>");
     }
 }