From 139f729a6a2aa07f9037aba1d49975f022ec09e4 Mon Sep 17 00:00:00 2001
From: Francois-Rene Rideau <tunes@google.com>
Date: Sun, 17 Mar 2013 14:41:02 -0400
Subject: [PATCH] Fix some tests for 2.32.13 on clisp.

---
 test/test-concatenate-source.script | 6 +++---
 test/test-xach-update-bug.script    | 2 --
 2 files changed, 3 insertions(+), 5 deletions(-)

diff --git a/test/test-concatenate-source.script b/test/test-concatenate-source.script
index 703b836b1..03e3ebecb 100644
--- a/test/test-concatenate-source.script
+++ b/test/test-concatenate-source.script
@@ -26,9 +26,9 @@
  (output-files mcso sys)
  (input-files mccso sys))
 ;; on ECL, we get un-equal pathnames.
-(assert-pathnames-equal
- (output-files mccso sys)
- (list (test-fasl "test-concatenate-source--all-systems.lisp")))
+(assert-pathname-equal
+ (first (output-files mccso sys))
+ (test-fasl "test-concatenate-source--all-systems.lisp"))
 (assert-pathnames-equal
  (output-files mccso sys)
  (input-files mlccso sys))
diff --git a/test/test-xach-update-bug.script b/test/test-xach-update-bug.script
index 74e79c380..74fdc5ed2 100644
--- a/test/test-xach-update-bug.script
+++ b/test/test-xach-update-bug.script
@@ -1,7 +1,5 @@
 ;;; -*- Lisp -*-
 
-(trace load compile-file perform-plan asdf/plan:traverse-action) ;; perform asdf/plan:compute-action-stamp
-
 (setf asdf/cache:*asdf-cache* nil) ;; disable cache between those two very different compilations.
 
 (defparameter foo :test-asdf-location-change)
-- 
GitLab