Author: bernhard
Date: Mon Dec 22 01:37:22 2008
New Revision: 34239
Modified:
trunk/languages/perl6/src/pmc/perl6str.pmc
trunk/src/charset/unicode.c
Log:
[codingstd] trailing whitespace
Modified: trunk/languages/perl6/src/pmc/perl6str.pmc
==============================================================================
--- trunk/languages/perl6/src/pmc/perl6str.pmc (original)
+++ trunk/languages/perl6/src/pmc/perl6str.pmc Mon Dec 22 01:37:22 2008
@@ -166,7 +166,7 @@
if (tolower(*s1) == 'n') {
if (strncasecmp(s1, "nan", 3) == 0) s1 += 3;
- while (s1 < end && isspace((unsigned char)*s1))
+ while (s1 < end && isspace((unsigned char)*s1))
s1++;
return (s1 == end) ? sign * atof("nan") : 0.0;
}
Modified: trunk/src/charset/unicode.c
==============================================================================
--- trunk/src/charset/unicode.c (original)
+++ trunk/src/charset/unicode.c Mon Dec 22 01:37:22 2008
@@ -758,7 +758,7 @@
case 0x1680: case 0x180e: case 0x2000: case 0x2001:
case 0x2002: case 0x2003: case 0x2004: case 0x2005:
case 0x2006: case 0x2007: case 0x2008: case 0x2009:
- case 0x200a: case 0x2028: case 0x2029: case 0x202f:
+ case 0x200a: case 0x2028: case 0x2029: case 0x202f:
case 0x205f: case 0x3000:
return 1;
default:
