Raymond Toy pushed to branch master at cmucl / cmucl

Commits:

1 changed file:

Changes:

  • tests/unix.lisp
    ... ... @@ -16,7 +16,9 @@
    16 16
     	     (assert-true fd)
    
    17 17
     	     (assert-true (equalp (length filename) (length template)))
    
    18 18
     	     (assert-false (equalp filename template))
    
    19
    -	     (assert-true (>= 5 (mismatch filename template))))))
    
    19
    +	     (assert-true (>= 5 (mismatch filename template))
    
    20
    +			  filename
    
    21
    +			  template))))
    
    20 22
           (when fd
    
    21 23
     	(unix:unix-unlink filename)))))
    
    22 24