MODULE = PSPP
-BOOT:
+MODULE = PSPP PACKAGE = PSPP
+
+void
+onBoot (ver)
+ const char *ver
+CODE:
+ assert (0 == strcmp (ver, bare_version));
msg_init (NULL, message_handler);
settings_init (0, 0);
fh_init ();
-
-MODULE = PSPP PACKAGE = PSPP
-
SV *
format_value (val, var)
SV *val
OUTPUT:
RETVAL
+
+struct variable *
+pxs_get_var_by_name (dict, name)
+ struct dictionary *dict
+ const char *name
+INIT:
+ SV *errstr = get_sv("PSPP::errstr", TRUE);
+ sv_setpv (errstr, "");
+CODE:
+ struct variable *var = dict_lookup_var (dict, name);
+ if ( ! var )
+ sv_setpv (errstr, "No such variable.");
+ RETVAL = var;
+ OUTPUT:
+RETVAL
+
+
MODULE = PSPP PACKAGE = PSPP::Var
}
RETVAL = casewriter_write (sfi->writer, &c);
finish:
-// Case_destroy (&c);
+// case_destroy (&c);
free (vv);
OUTPUT:
RETVAL
OUTPUT:
RETVAL
-