Plugged some small memory leaks

[pspp] / src / data / identifier.c

diff --git a/src/data/identifier.c b/src/data/identifier.c
index f90f4be1612da6b292a7759fd356124b3c4dfa7f..c6718a5e35d36a14ff7998a73efe7a6462b46a88 100644 (file)
--- a/src/data/identifier.c
+++ b/src/data/identifier.c
@@ -31,7 +31,7 @@
 
 
 /* Table of keywords. */
-const char *keywords[T_N_KEYWORDS + 1] = 
+const char *const keywords[T_N_KEYWORDS + 1] = 
   {
     "AND", "OR", "NOT",
     "EQ", "GE", "GT", "LE", "LT", "NE",
@@ -42,7 +42,7 @@ const char *keywords[T_N_KEYWORDS + 1] =
 /* Recognizing identifiers. */
 
 /* Returns true if C may be the first character in an
-   identifier. */
+   identifier in the current locale. */
 bool
 lex_is_id1 (char c_) 
 {
@@ -50,6 +50,7 @@ lex_is_id1 (char c_)
   return isalpha (c) || c == '@' || c == '#' || c == '$';
 }
 
+
 /* Returns true if C may be a character in an identifier other
    than the first. */
 bool
@@ -116,7 +117,7 @@ lex_id_match (const char *kw, const char *tok)
 int
 lex_id_to_token (const char *id, size_t len)
 {
-  const char **kwp;
+  const char *const *kwp;
 
   if (len < 2 || len > 4)
     return T_ID;