# HG changeset patch
# User Adam Chlipala <adamc@hcoop.net>
# Date 1260292001 18000
# Node ID e3f6620afd51a72f0a35cf8eaa49ff8df243e686
# Parent  3bc726a822fb44204b3617e08430f965941eeb61
Convert ctype is*() function results to booleans

diff -r 3bc726a822fb -r e3f6620afd51 src/c/urweb.c
--- a/src/c/urweb.c	Tue Dec 08 11:45:19 2009 -0500
+++ b/src/c/urweb.c	Tue Dec 08 12:06:41 2009 -0500
@@ -3140,50 +3140,51 @@
 }
 
 uw_Basis_bool uw_Basis_isalnum(uw_context ctx, uw_Basis_char c) {
-  return isalnum(c);
+  return !!isalnum(c);
 }
 
 uw_Basis_bool uw_Basis_isalpha(uw_context ctx, uw_Basis_char c) {
-  return isalpha(c);
+  return !!isalpha(c);
 }
 
 uw_Basis_bool uw_Basis_isblank(uw_context ctx, uw_Basis_char c) {
-  return isblank(c);
+  return !!isblank(c);
 }
 
 uw_Basis_bool uw_Basis_iscntrl(uw_context ctx, uw_Basis_char c) {
-  return iscntrl(c);
+  return !!iscntrl(c);
 }
 
 uw_Basis_bool uw_Basis_isdigit(uw_context ctx, uw_Basis_char c) {
-  return isdigit(c);
+  return !!isdigit(c);
 }
 
 uw_Basis_bool uw_Basis_isgraph(uw_context ctx, uw_Basis_char c) {
-  return isgraph(c);
+  return !!isgraph(c);
 }
 
 uw_Basis_bool uw_Basis_islower(uw_context ctx, uw_Basis_char c) {
-  return islower(c);
+  return !!islower(c);
 }
 
 uw_Basis_bool uw_Basis_isprint(uw_context ctx, uw_Basis_char c) {
-  return isprint(c);
+  return !!isprint(c);
 }
 
 uw_Basis_bool uw_Basis_ispunct(uw_context ctx, uw_Basis_char c) {
-  return ispunct(c);
+  return !!ispunct(c);
 }
 
 uw_Basis_bool uw_Basis_isspace(uw_context ctx, uw_Basis_char c) {
-  return isspace(c);
+  return !!isspace(c);
 }
+
 uw_Basis_bool uw_Basis_isupper(uw_context ctx, uw_Basis_char c) {
-  return isupper(c);
+  return !!isupper(c);
 }
 
 uw_Basis_bool uw_Basis_isxdigit(uw_context ctx, uw_Basis_char c) {
-  return isxdigit(c);
+  return !!isxdigit(c);
 }
 
 uw_Basis_char uw_Basis_tolower(uw_context ctx, uw_Basis_char c) {