diff src/callproc.c @ 112434:9de5a68b57e1

Promote SSDATA macro from gtkutil.c and xsmfns.c to lisp.h.
author Paul Eggert <eggert@cs.ucla.edu>
date Sat, 22 Jan 2011 18:56:06 -0800
parents 42e22c4f06b7
children
line wrap: on
line diff
--- a/src/callproc.c	Sat Jan 22 17:09:09 2011 -0800
+++ b/src/callproc.c	Sat Jan 22 18:56:06 2011 -0800
@@ -1278,7 +1278,7 @@
 	{
 	  if (SBYTES (entry) > varlen && SREF (entry, varlen) == '=')
 	    {
-	      *value = (char *) SDATA (entry) + (varlen + 1);
+	      *value = SSDATA (entry) + (varlen + 1);
 	      *valuelen = SBYTES (entry) - (varlen + 1);
 	      return 1;
 	    }
@@ -1310,7 +1310,7 @@
 	= Fframe_parameter (NILP (frame) ? selected_frame : frame, Qdisplay);
       if (STRINGP (display))
 	{
-	  *value    = (char *) SDATA (display);
+	  *value    = SSDATA (display);
 	  *valuelen = SBYTES (display);
 	  return 1;
 	}
@@ -1594,4 +1594,3 @@
   defsubr (&Sgetenv_internal);
   defsubr (&Scall_process_region);
 }
-