summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorsimonmar <unknown>2005-03-16 10:55:04 +0000
committersimonmar <unknown>2005-03-16 10:55:04 +0000
commit77efda41e32c179648fa148c270dafd1de179f53 (patch)
tree9a97895540fa88395d6e80a0d7ea498c071b66f8
parent90b7403bcdb4faa8ad1fee17c3e49b8972749c5f (diff)
downloadhaskell-77efda41e32c179648fa148c270dafd1de179f53.tar.gz
[project @ 2005-03-16 10:55:04 by simonmar]
Back-port changes from WCsubst.c:iswprint()
-rw-r--r--libraries/base/cbits/ubconfc7
1 files changed, 6 insertions, 1 deletions
diff --git a/libraries/base/cbits/ubconfc b/libraries/base/cbits/ubconfc
index 6344eccafe..cf0967c00b 100644
--- a/libraries/base/cbits/ubconfc
+++ b/libraries/base/cbits/ubconfc
@@ -308,7 +308,12 @@ int p(int c) \\
*/
unipred(u_iswcntrl,GENCAT_CC)
-unipred(u_iswprint,~(GENCAT_ZL|GENCAT_ZP|GENCAT_CC|GENCAT_CF|GENCAT_CS|GENCAT_CO))
+unipred(u_iswprint, \
+(GENCAT_MC | GENCAT_NO | GENCAT_SK | GENCAT_ME | GENCAT_ND | \
+ GENCAT_PO | GENCAT_LT | GENCAT_PC | GENCAT_SM | GENCAT_ZS | \
+ GENCAT_LU | GENCAT_PD | GENCAT_SO | GENCAT_PE | GENCAT_PF | \
+ GENCAT_PS | GENCAT_SC | GENCAT_LL | GENCAT_LM | GENCAT_PI | \
+ GENCAT_NL | GENCAT_MN | GENCAT_LO))
unipred_s(u_iswspace,GENCAT_ZS)
unipred(u_iswupper,(GENCAT_LU|GENCAT_LT))
unipred(u_iswlower,GENCAT_LL)