This is the mail archive of the kawa@sourceware.org mailing list for the Kawa project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Missing else-clause in strings-test.scm (trivial patch)


The cond-expand near the end of testsuite/strings-test.scm is missing an
else clause.  It's probably fine as is but the else clause may be worth
adding just for consistency.

Regards,

-chaw

diff --git a/testsuite/strings-test.scm b/testsuite/strings-test.scm
index ef655e1..c12e528 100644
--- a/testsuite/strings-test.scm
+++ b/testsuite/strings-test.scm
@@ -2871,8 +2871,8 @@
   (test-equal "c😼b😂a" (reverse-list->string '(#\a #\😂 #\b #\😼 #\c)))
 
   (test-equal "y😂a😼xy" (xsubstring "a😼xy😂" 3 9))
-  (test-equal "y😂a😼" (xsubstring "a😼xy😂" -2 2))
-))
+  (test-equal "y😂a😼" (xsubstring "a😼xy😂" -2 2)))
 ;; end section with UTF-8 literals
+ (else))
 
 (test-end)

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]