uuid: Fix typo in 'uuid=?' test.

* tests/uuid.scm ("uuid=?"): Change to 'test-assert'.
This commit is contained in:
Ludovic Courtès 2017-10-06 14:15:08 +02:00
parent 8bde6a524e
commit 0b12324284
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 1 additions and 1 deletions

View File

@ -57,7 +57,7 @@
"1234-ABCD"
(uuid->string (uuid "1234-abcd" 'fat32)))
(test-equal "uuid=?"
(test-assert "uuid=?"
(and (uuid=? (uuid-bytevector (uuid "1234-abcd" 'fat32))
(uuid "1234-abcd" 'fat32))
(uuid=? (uuid "1234-abcd" 'fat32)