X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fvector.c;h=9a0d749265529f92332a2877feb5a1ad1db9c225;hb=b7e33825d30a18360f24a18faf4b7d2e9efb8142;hp=99b3423af1467ff1aea250bd73221749bb3e88bc;hpb=74a57f26f1458b28a0fddbb9f46004ac8f4d9c30;p=pspp diff --git a/src/vector.c b/src/vector.c index 99b3423af1..9a0d749265 100644 --- a/src/vector.c +++ b/src/vector.c @@ -18,10 +18,11 @@ 02111-1307, USA. */ #include -#include +#include "error.h" #include #include "alloc.h" #include "command.h" +#include "dictionary.h" #include "error.h" #include "lexer.h" #include "misc.h" @@ -112,7 +113,7 @@ cmd_vector (void) int ndig; /* Name of an individual variable to be created. */ - char name[9]; + char name[SHORT_NAME_LEN + 1]; /* Vector variables. */ struct variable **v; @@ -130,13 +131,13 @@ cmd_vector (void) if (!lex_force_match (')')) goto fail; - /* First check that all the generated variable names are 8 + /* First check that all the generated variable names are SHORT_NAME_LEN characters or shorter. */ ndig = intlog10 (nv); for (cp = vecnames; *cp;) { int len = strlen (cp); - if (len + ndig > 8) + if (len + ndig > SHORT_NAME_LEN) { msg (SE, _("%s%d is too long for a variable name."), cp, nv); goto fail;