Promote SSDATA macro from gtkutil.c and xsmfns.c to lisp.h.

1 files changed, 3 insertions, 4 deletions

diff --git a/src/lread.c b/src/lread.c
index 60a2778dbbc..0baab54a00c 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1082,9 +1082,9 @@ Return t if the file exists and loads successfully.  */)
 #ifdef DOS_NT
           fmode = "rb";
 #endif /* DOS_NT */
-          stat ((char *)SDATA (efound), &s1);
+          stat (SSDATA (efound), &s1);
           SSET (efound, SBYTES (efound) - 1, 0);
-          result = stat ((char *)SDATA (efound), &s2);
+          result = stat (SSDATA (efound), &s2);
           SSET (efound, SBYTES (efound) - 1, 'c');
 
           if (result >= 0 && (unsigned) s1.st_mtime < (unsigned) s2.st_mtime)
@@ -1125,7 +1125,7 @@ Return t if the file exists and loads successfully.  */)
 #ifdef WINDOWSNT
   emacs_close (fd);
   efound = ENCODE_FILE (found);
-  stream = fopen ((char *) SDATA (efound), fmode);
+  stream = fopen (SSDATA (efound), fmode);
 #else  /* not WINDOWSNT */
   stream = fdopen (fd, fmode);
 #endif /* not WINDOWSNT */
@@ -4404,4 +4404,3 @@ to load.  See also `load-dangerous-libraries'.  */);
   Qrehash_threshold = intern_c_string ("rehash-threshold");
   staticpro (&Qrehash_threshold);
 }
-