* lib.c (string_lt): Bugfix: wcscmp returns some value less than zero,

not specifically -1.

1 files changed, 1 insertions, 2 deletions

diff --git a/lib.c b/lib.c
index 89a38496..2c3ddff4 100644
--- a/lib.c
+++ b/lib.c
@@ -2092,8 +2092,7 @@ val trim_str(val str)
 
 val string_lt(val astr, val bstr)
 {
-  int cmp = wcscmp(c_str(astr), c_str(bstr));
-  return cmp == -1 ? t : nil;
+  return wcscmp(c_str(astr), c_str(bstr)) < 0 ? t : nil;
 }
 
 val int_str(val str, val base)