X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=inline;f=tests%2Fperl-module.at;h=58181c5f98715ac855ac65d6a31c1ae32c760a53;hb=6417b81fb2d5665471ba9fadd180ed1ddeb29246;hp=329a3f808d21365deee7de670a5722bca8667fb0;hpb=ee1bfc05f5ab73883df26e616019e07a1bfee873;p=pspp

diff --git a/tests/perl-module.at b/tests/perl-module.at
index 329a3f808d..58181c5f98 100644
--- a/tests/perl-module.at
+++ b/tests/perl-module.at
@@ -23,7 +23,10 @@ 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
 
@@ -674,10 +677,8 @@ 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])
-# Skip this test if Perl's Memory::Usage module is not installed.
-AT_CHECK([perl -MMemory::Usage -e '' || exit 77])
 AT_CHECK([run_perl_module "$abs_top_builddir/perl-module/t/Pspp.t"], [0],
-  [[1..38
+  [[1..37
 ok 1 - use PSPP;
 ok 2 - Dictionary Creation
 ok 3
@@ -716,6 +717,5 @@ ok 34 - Missing Value Positive SYS
 ok 35 - Missing Value Positive Num
 ok 36 - Custom Attributes
 ok 37 - Case count
-ok 38 - Memory management of append_case
 ]],[ignore])
 AT_CLEANUP