diff --git a/src/tests/ecl_chap14_cons.tst b/src/tests/ecl_chap14_cons.tst
index 59e6ba405..b9cdd5265 100644
--- a/src/tests/ecl_chap14_cons.tst
+++ b/src/tests/ecl_chap14_cons.tst
@@ -267,7 +267,7 @@ error
 	'(last butlast nbutlast))
 ((nil (1) (1 2) (1 2 3) (2 3 4) (3 4 5) error (1 . 2) (1 2 . 3) (1 2 3 . 4) (2 3 4 . 5))
  (nil nil nil nil (1) (1 2) error nil nil nil (1))
- (nil nil nil nil (1) (1 2) error nil nil nil (1))))
+ (nil nil nil nil (1) (1 2) error nil nil nil (1)))
 
 (let ((a (list 1 2 3)))
   (rplacd (last a) a)