Adopt use of gnulib for portability.
[pspp] / src / loop.c
index bfe04d11c432240735453e1d6226ebb346a9f75f..06936778ef0f990751174373f5b7499a339c4eee 100644 (file)
@@ -14,8 +14,8 @@
 
    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
-   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
-   02111-1307, USA. */
+   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+   02110-1301, USA. */
 
 #include <config.h>
 #include "error.h"
@@ -32,6 +32,9 @@
 #include "str.h"
 #include "var.h"
 
+#include "gettext.h"
+#define _(msgid) gettext (msgid)
+
 #include "debug-print.h"
 
 /* LOOP strategy:
@@ -166,7 +169,7 @@ static int
 internal_cmd_loop (void)
 {
   /* Name of indexing variable if applicable. */
-  char name[SHORT_NAME_LEN + 1];
+  char name[LONG_NAME_LEN + 1];
 
   /* Create and initialize transformations to facilitate
      error-handling. */
@@ -224,7 +227,7 @@ internal_cmd_loop (void)
        }
     }
   else
-    name[0] = 0;
+    name[0] = '\0';
 
   /* Parse IF clause. */
   if (lex_match_id ("IF"))
@@ -243,7 +246,7 @@ internal_cmd_loop (void)
     }
 
   /* Find variable; create if necessary. */
-  if (name[0])
+  if (name[0] != '\0')
     {
       two->index = dict_lookup_var (default_dict, name);
       if (!two->index)