intern: Fix GCC warning.

Otherwise, GCC issues the following warning:

intern.c:83: warning: comparison of distinct pointer types lacks a
cast.

diff --git a/src/libpspp/intern.c b/src/libpspp/intern.c
index fe0e784cda6b02db4e28e54a7fdce3eb04e08cd3..fc31acf0b439fec19c339296abe3e5fe8f5ce314 100644 (file)
--- a/src/libpspp/intern.c
+++ b/src/libpspp/intern.c
@@ -78,8 +78,9 @@ intern_new (const char *s)
 }
 
 static struct interned_string *
-interned_string_from_string (const char *s)
+interned_string_from_string (const char *s_)
 {
+  char (*s)[1] = (char (*)[1]) s_;
   struct interned_string *is = UP_CAST (s, struct interned_string, string);
   assert (is->ref_cnt > 0);
   return is;