SHOW WEIGHT.
])
AT_CHECK([pspp -O format=csv dump-dict.sps], [0],
- [File label:
+ [File label: My Dictionary
-My Dictionary
-
-Documents in the active file:
+Documents in the active dataset:
These Documents
,Display Alignment: Left,,
,Display Width: 20,,
-File label:
-
-This is the file label
+File label: This is the file label
-Documents in the active file:
+Documents in the active dataset:
This is a document line
,Display Alignment: Left,,
,Display Width: 20,,
-File label:
-
-This is the file label
+File label: This is the file label
-Documents in the active file:
+Documents in the active dataset:
This is a document line
print $PSPP::errstr, "\n";
]])
AT_CHECK([RUN_PERL_MODULE test.pl], [0],
- [[Error opening "no-such-file.sav" for reading as a system file: No such file or directory.
+ [[Error opening `no-such-file.sav' for reading as a system file: No such file or directory.
]],
[[Name "PSPP::errstr" used only once: possible typo at test.pl line 8.
]])
AT_SETUP([Perl Pspp.t])
AT_SKIP_IF([test "$WITH_PERL_MODULE" = no])
+# Skip this test if Perl's Text::Diff module is not installed.
+AT_CHECK([perl -MText::Diff -e '' || exit 77])
AT_CHECK([RUN_PERL_MODULE $abs_top_builddir/perl-module/t/Pspp.t], [0],
- [[1..36
+ [[1..37
ok 1 - use PSPP;
ok 2 - Dictionary Creation
ok 3
ok 34 - Missing Value Positive SYS
ok 35 - Missing Value Positive Num
ok 36 - Custom Attributes
-]],
- [[# @&t@
-# @@ -0,0 +1 @@
-# +
-# @@ -0,0 +1 @@
-# +
-# @@ -0,0 +1 @@
-# +
-# @@ -0,0 +1 @@
-# +
-]])
+ok 37 - Case count
+]],[ignore])
AT_CLEANUP