diff --git a/lib/chibi/show-test.sld b/lib/chibi/show-test.sld
index c57383d5..8880ac14 100644
--- a/lib/chibi/show-test.sld
+++ b/lib/chibi/show-test.sld
@@ -733,14 +733,14 @@ def | 6
       (test "\x1B;[31mred\x1B;[0m" (show #f (as-red "red")))
       (test "\x1B;[31mred\x1B;[34mblue\x1B;[31mred\x1B;[0m"
           (show #f (as-red "red" (as-blue "blue") "red")))
+      (test "\x1b;[31m1234567\x1b;[0m col: 7"
+            (show #f (as-unicode (as-red "1234567") (fn ((col)) (each " col: " col)))))
 
       ;; unicode
       (test "〜日本語〜"
           (show #f (with ((pad-char #\〜)) (padded/both 5 "日本語"))))
       (test "日本語"
             (show #f (as-unicode (with ((pad-char #\〜)) (padded/both 5 "日本語")))))
-      (test "\x1b;[31m1234567\x1b;[0m col: 7"
-            (show #f (as-unicode (as-red "1234567") (fn ((col)) (each " col: " col)))))
       (test "日本語 col: 6"
             (show #f (as-unicode "日本語" (fn ((col)) (each " col: " col)))))