dnl PSPP - a program for statistical analysis.
-dnl Copyright (C) 2017 Free Software Foundation, Inc.
+dnl Copyright (C) 2017, 2020, 2021 Free Software Foundation, Inc.
dnl
dnl This program is free software: you can redistribute it and/or modify
dnl it under the terms of the GNU General Public License as published by
m4_divert_push([PREPARE_TESTS])
# Find the Address Sanitizer library that PSPP is linked against, if any.
# If it exists, it needs to be preloaded when we run Perl.
-asan_lib=$($abs_top_builddir/libtool --mode=execute ldd \
- $abs_top_builddir/src/ui/terminal/pspp 2>/dev/null \
+asan_lib=$("$abs_top_builddir/libtool" --mode=execute ldd \
+ "$abs_top_builddir/src/ui/terminal/pspp" 2>/dev/null \
| grep asan \
| awk '{print $3}')
-if test ! -e "$asan_lib"; then
+if test -e "$asan_lib"; then
+ USING_ASAN=:
+else
+ USING_ASAN=false
asan_lib=
fi
dnl not need to be run with the perl-module build directory as the current
dnl working directory.
run_perl_module () {
- LD_PRELOAD=$asan_lib:$LD_PRELOAD \
- LD_LIBRARY_PATH=$abs_top_builddir/src/.libs \
- DYLD_LIBRARY_PATH=$abs_top_builddir/src/.libs \
+ LD_PRELOAD="$asan_lib":"$LD_PRELOAD" \
+ LD_LIBRARY_PATH="$abs_top_builddir/src/.libs" \
+ DYLD_LIBRARY_PATH="$abs_top_builddir/src/.libs" \
ASAN_OPTIONS="$ASAN_OPTIONS detect_leaks=false" \
- $PERL -I$abs_top_builddir/perl-module/blib/arch \
- -I$abs_top_builddir/perl-module/blib/lib "$@"
+ $PERL -I"$abs_top_builddir/perl-module/blib/arch" \
+ -I"$abs_top_builddir/perl-module/blib/lib" "$@"
}
m4_divert_pop([PREPARE_TESTS])
These Documents
Table: Variables
-Name,Position,Label,Measurement Level,Role,Width,Alignment,Print Format,Write Format,Missing Values
-legal,1,,Scale,Input,8,Right,F9.2,F9.2,
-money,2,,Scale,Input,8,Right,DOLLAR6.2,DOLLAR6.2,
+Name,Position,Measurement Level,Role,Width,Alignment,Print Format,Write Format
+legal,1,Scale,Input,8,Right,F9.2,F9.2
+money,2,Scale,Input,8,Right,DOLLAR6.2,DOLLAR6.2
dump-dict.sps:5: note: SHOW: WEIGHT is money.
])
])
AT_CHECK([pspp -O format=csv dump-dicts.sps], [0], [dnl
Table: Variables
-Name,Position,Label,Measurement Level,Role,Width,Alignment,Print Format,Write Format,Missing Values
-id,1,,Scale,Input,8,Right,F2.0,F2.0,
-name,2,,Nominal,Input,20,Left,A20,A20,
+Name,Position,Measurement Level,Role,Width,Alignment,Print Format,Write Format
+id,1,Scale,Input,8,Right,F2.0,F2.0
+name,2,Nominal,Input,20,Left,A20,A20
Table: File Label
Label,This is the file label
34,frederick
Table: Variables
-Name,Position,Label,Measurement Level,Role,Width,Alignment,Print Format,Write Format,Missing Values
-id,1,,Scale,Input,8,Right,F2.0,F2.0,
-name,2,,Nominal,Input,20,Left,A20,A20,
+Name,Position,Measurement Level,Role,Width,Alignment,Print Format,Write Format
+id,1,Scale,Input,8,Right,F2.0,F2.0
+name,2,Nominal,Input,20,Left,A20,A20
Table: File Label
Label,This is the file label
A Numeric Variable,1,Unity
,2,Duality
,3,Thripality
-
-Footnotes:
-a,User-missing value
+Footnote: a. User-missing value
Table: Variable and Dataset Attributes
Variable and Name,,Value
A Numeric Variable,1,Unity
,2,Duality
,3,Thripality
-
-Footnotes:
-a,User-missing value
+Footnote: a. User-missing value
Table: Variable and Dataset Attributes
Variable and Name,,Value
AT_CLEANUP
AT_SETUP([Perl Pspp.t])
+AT_KEYWORDS([slow])
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],
+AT_CHECK([run_perl_module "$abs_top_builddir/perl-module/t/Pspp.t"], [0],
[[1..37
ok 1 - use PSPP;
ok 2 - Dictionary Creation