projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
data-in: Make data_in() parameters more uniform.
[pspp]
/
perl-module
/
PSPP.xs
diff --git
a/perl-module/PSPP.xs
b/perl-module/PSPP.xs
index ca3f873ae110be68520c63a09c4f4601ca623c06..bf90d986f327b811fb5f67822d7cf5c332b0c0ca 100644
(file)
--- a/
perl-module/PSPP.xs
+++ b/
perl-module/PSPP.xs
@@
-654,10
+654,9
@@
CODE:
if ( ifmt )
{
struct substring ss = ss_cstr (SvPV_nolen (sv));
if ( ifmt )
{
struct substring ss = ss_cstr (SvPV_nolen (sv));
- if ( ! data_in (ss, LEGACY_NATIVE, ifmt->type, 0, 0, 0,
- sfi->dict,
- case_data_rw (c, v),
- var_get_width (v)) )
+ if ( ! data_in (ss, LEGACY_NATIVE, ifmt->type, 0, 0,
+ case_data_rw (c, v), var_get_width (v),
+ dict_get_encoding (sfi->dict)))
{
RETVAL = 0;
goto finish;
{
RETVAL = 0;
goto finish;