projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fixed a bug which crept into the npplot function
[pspp]
/
src
/
vector.c
diff --git
a/src/vector.c
b/src/vector.c
index e63ac2153f6166eef9d1dcc0694ab539ac9308bc..2a712a6220c310e345433ac73e81ef8c8f7ef336 100644
(file)
--- a/
src/vector.c
+++ b/
src/vector.c
@@
-18,11
+18,11
@@
02111-1307, USA. */
#include <config.h>
02111-1307, USA. */
#include <config.h>
-#include
<assert.h>
+#include
"error.h"
#include <stdlib.h>
#include "alloc.h"
#include <stdlib.h>
#include "alloc.h"
-#include "cases.h"
#include "command.h"
#include "command.h"
+#include "dictionary.h"
#include "error.h"
#include "lexer.h"
#include "misc.h"
#include "error.h"
#include "lexer.h"
#include "misc.h"
@@
-44,8
+44,6
@@
cmd_vector (void)
/* Maximum allocated position for vecnames, plus one position. */
char *endp = NULL;
/* Maximum allocated position for vecnames, plus one position. */
char *endp = NULL;
- lex_match_id ("VECTOR");
-
cp = vecnames = xmalloc (256);
endp = &vecnames[256];
do
cp = vecnames = xmalloc (256);
endp = &vecnames[256];
do
@@
-169,9
+167,7
@@
cmd_vector (void)
for (i = 0; i < nv; i++)
{
sprintf (name, "%s%d", cp, i + 1);
for (i = 0; i < nv; i++)
{
sprintf (name, "%s%d", cp, i + 1);
- v[i] = dict_create_var (default_dict, name, 0);
- assert (v[i] != NULL);
- envector (v[i]);
+ v[i] = dict_create_var_assert (default_dict, name, 0);
}
if (!dict_create_vector (default_dict, cp, v, nv))
assert (0);
}
if (!dict_create_vector (default_dict, cp, v, nv))
assert (0);