aboutsummaryrefslogtreecommitdiff
path: root/tests/uuid.scm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/uuid.scm')
-rw-r--r--tests/uuid.scm4
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/uuid.scm b/tests/uuid.scm
index c2f15de996..aacce77233 100644
--- a/tests/uuid.scm
+++ b/tests/uuid.scm
@@ -53,4 +53,8 @@
"1970-01-01-17-14-42-99"
(uuid->string (uuid "1970-01-01-17-14-42-99" 'iso9660)))
+(test-equal "uuid, FAT32, format preserved"
+ "1234-ABCD"
+ (uuid->string (uuid "1234-abcd" 'fat32)))
+
(test-end)