X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Fperl-module.at;h=1f4a96288c53fc5a7b875bd8abdb90d13cd76988;hb=d97b45134c672a8daf9cede78bd844484dcdaaeb;hp=9342bc358c66d555a98e748ca0ced2c1c79a966f;hpb=b401615e6db40bf74394839b96600afe3a868a95;p=pspp diff --git a/tests/perl-module.at b/tests/perl-module.at index 9342bc358c..1f4a96288c 100644 --- a/tests/perl-module.at +++ b/tests/perl-module.at @@ -5,8 +5,12 @@ dnl built (with "make") but before it has been installed. The -I options are dnl equivalent to "use ExtUtils::testlib;" inside the Perl program, but it does dnl not need to be run with the perl-module build directory as the current dnl working directory. +dnl +dnl XXX "libtool --mode=execute" is probably better than setting +dnl LD_LIBRARY_PATH. m4_define([RUN_PERL_MODULE], [LD_LIBRARY_PATH=$abs_top_builddir/src/.libs \ + DYLD_LIBRARY_PATH=$abs_top_builddir/src/.libs \ $PERL -I$abs_top_builddir/perl-module/blib/arch \ -I$abs_top_builddir/perl-module/blib/lib]) @@ -56,9 +60,7 @@ DISPLAY DICTIONARY. SHOW WEIGHT. ]) AT_CHECK([pspp -O format=csv dump-dict.sps], [0], - [File label: - -My Dictionary + [File label: My Dictionary Documents in the active dataset: @@ -151,9 +153,7 @@ name,Format: A20,,2 ,Display Alignment: Left,, ,Display Width: 20,, -File label: - -This is the file label +File label: This is the file label Documents in the active dataset: @@ -173,9 +173,7 @@ name,Format: A20,,2 ,Display Alignment: Left,, ,Display Width: 20,, -File label: - -This is the file label +File label: This is the file label Documents in the active dataset: @@ -483,11 +481,11 @@ numeric,A Numeric Variable,,3 ,2,Duality, ,3,Thripality, ,Custom attributes:,, -,size,large, -,nationality,foreign, ,colour[1],blue, ,colour[2],pink, ,colour[3],violet, +,nationality,foreign, +,size,large, date,A Date Variable,,4 ,Format: DATE11,, ,Measure: Scale,, @@ -537,11 +535,11 @@ numeric,A Numeric Variable,,3 ,2,Duality, ,3,Thripality, ,Custom attributes:,, -,size,large, -,nationality,foreign, ,colour[1],blue, ,colour[2],pink, ,colour[3],violet, +,nationality,foreign, +,size,large, date,A Date Variable,,4 ,Format: DATE11,, ,Measure: Scale,, @@ -707,7 +705,7 @@ 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 @@ -745,15 +743,6 @@ ok 33 - Missing Value Positive 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