projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Changed DFM from open-at-first-access to explicit-open. Before,
[pspp]
/
src
/
formats.c
diff --git
a/src/formats.c
b/src/formats.c
index 8d2918a769a2528da8d0673f4619ba09e274d256..36c019c01d07d50f15c7019a9a007718c0f4260c 100644
(file)
--- a/
src/formats.c
+++ b/
src/formats.c
@@
-28,8
+28,6
@@
#include "str.h"
#include "var.h"
#include "str.h"
#include "var.h"
-#undef DEBUGGING
-/*#define DEBUGGING 1*/
#include "debug-print.h"
#if DEBUGGING
#include "debug-print.h"
#if DEBUGGING
@@
-47,21
+45,18
@@
static int internal_cmd_formats (int);
int
cmd_print_formats (void)
{
int
cmd_print_formats (void)
{
- lex_match_id ("FORMATS");
return internal_cmd_formats (FORMATS_PRINT);
}
int
cmd_write_formats (void)
{
return internal_cmd_formats (FORMATS_PRINT);
}
int
cmd_write_formats (void)
{
- lex_match_id ("FORMATS");
return internal_cmd_formats (FORMATS_WRITE);
}
int
cmd_formats (void)
{
return internal_cmd_formats (FORMATS_WRITE);
}
int
cmd_formats (void)
{
- lex_match_id ("FORMATS");
return internal_cmd_formats (FORMATS_PRINT | FORMATS_WRITE);
}
return internal_cmd_formats (FORMATS_PRINT | FORMATS_WRITE);
}
@@
-86,7
+81,7
@@
internal_cmd_formats (int which)
if (token == '.')
break;
if (token == '.')
break;
- if (!parse_variables (
NULL
, &v, &cv, PV_SAME_TYPE))
+ if (!parse_variables (
default_dict
, &v, &cv, PV_SAME_TYPE))
return CMD_PART_SUCCESS_MAYBE;
type = v[0]->type;
return CMD_PART_SUCCESS_MAYBE;
type = v[0]->type;