projects
/
pspp-builds.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Added coefficient-handling routines
[pspp-builds.git]
/
src
/
var-labs.c
diff --git
a/src/var-labs.c
b/src/var-labs.c
index bc22439669c49b919def5785a67af970e7b5d344..3b5aa83821baa2a7c2d216cef17df629fc69312d 100644
(file)
--- a/
src/var-labs.c
+++ b/
src/var-labs.c
@@
-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
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., 5
9 Temple Place - Suite 330
, Boston, MA
- 0211
1-1307
, USA. */
+ Foundation, Inc., 5
1 Franklin Street, Fifth Floor
, Boston, MA
+ 0211
0-1301
, USA. */
#include <config.h>
#include <stdio.h>
#include <config.h>
#include <stdio.h>
@@
-27,26
+27,23
@@
#include "str.h"
#include "var.h"
#include "str.h"
#include "var.h"
-#include "debug-print.h"
+#include "gettext.h"
+#define _(msgid) gettext (msgid)
-#if DEBUGGING
-static void debug_print (void);
-#endif
+#include "debug-print.h"
int
cmd_variable_labels (void)
{
int
cmd_variable_labels (void)
{
- struct variable **v;
- int nv;
-
- int i;
-
- lex_match_id ("VARIABLE");
- lex_match_id ("LABELS");
- lex_match ('/');
do
{
do
{
- parse_variables (default_dict, &v, &nv, PV_NONE);
+ struct variable **v;
+ size_t nv;
+
+ size_t i;
+
+ if (!parse_variables (default_dict, &v, &nv, PV_NONE))
+ return CMD_PART_SUCCESS_MAYBE;
if (token != T_STRING)
{
if (token != T_STRING)
{
@@
-54,16
+51,16
@@
cmd_variable_labels (void)
free (v);
return CMD_PART_SUCCESS_MAYBE;
}
free (v);
return CMD_PART_SUCCESS_MAYBE;
}
- if (ds_length (&tokstr) >
120
)
+ if (ds_length (&tokstr) >
255
)
{
{
- msg (SW, _("Truncating variable label to
120
characters."));
- ds_truncate (&tokstr,
120
);
+ msg (SW, _("Truncating variable label to
255
characters."));
+ ds_truncate (&tokstr,
255
);
}
for (i = 0; i < nv; i++)
{
if (v[i]->label)
free (v[i]->label);
}
for (i = 0; i < nv; i++)
{
if (v[i]->label)
free (v[i]->label);
- v[i]->label = xstrdup (ds_
value
(&tokstr));
+ v[i]->label = xstrdup (ds_
c_str
(&tokstr));
}
lex_get ();
}
lex_get ();
@@
-72,27
+69,16
@@
cmd_variable_labels (void)
free (v);
}
while (token != '.');
free (v);
}
while (token != '.');
-#if 0 && DEBUGGING
- debug_print ();
-#endif
return CMD_SUCCESS;
}
return CMD_SUCCESS;
}
-#if 0 && DEBUGGING
-static void
-debug_print (void)
+
+
+const char *
+var_to_string(const struct variable *var)
{
{
- int i;
+ if ( !var )
+ return 0;
- printf (_("Variable labels:\n"));
- for (i = 0; i < nvar; i++)
- {
- printf (" %8s: ", var[i]->name);
- if (var[i]->label)
- printf ("`%s'", var[i]->label);
- else
- printf (_("(no variable label)"));
- printf ("\n");
- }
+ return ( var->label ? var->label : var->name);
}
}
-#endif /* DEBUGGING */