Author: infinoid
Date: Thu Dec 25 07:18:09 2008
New Revision: 34347
Modified:
trunk/languages/perl6/src/pmc/perl6str.pmc
trunk/src/jit/alpha/jit_defs.c
trunk/src/jit/amd64/jit_defs.c
trunk/src/jit/arm/jit_defs.c
trunk/src/jit/hppa/jit_defs.c
trunk/src/jit/i386/jit_defs.c
trunk/src/jit/ia64/jit_defs.c
trunk/src/jit/mips/jit_defs.c
trunk/src/jit/ppc/jit_defs.c
trunk/src/jit/skeleton/jit_defs.c
trunk/src/jit/sun4/jit_defs.c
Log:
[cage] Fix failures from the following codingstd tests:
* check_toxxx.t
* c_code_coda.t
Modified: trunk/languages/perl6/src/pmc/perl6str.pmc
==============================================================================
--- trunk/languages/perl6/src/pmc/perl6str.pmc (original)
+++ trunk/languages/perl6/src/pmc/perl6str.pmc Thu Dec 25 07:18:09 2008
@@ -157,16 +157,18 @@
sign = -1.0; s1++;
}
- if (tolower(s1[0]) == 'i' && tolower(s1[1]) == 'n'
- && tolower(s1[2]) == 'f') {
+ if (tolower((unsigned char)s1[0]) == 'i'
+ && tolower((unsigned char)s1[1]) == 'n'
+ && tolower((unsigned char)s1[2]) == 'f') {
s1 += 3;
while (s1 < end && isspace((unsigned char)*s1))
s1++;
return (s1 == end) ? sign * atof("inf") : 0.0;
}
- if (tolower(s1[0]) == 'n' && tolower(s1[1]) == 'a'
- && tolower(s1[2]) == 'n') {
+ if (tolower((unsigned char)s1[0]) == 'n'
+ && tolower((unsigned char)s1[1]) == 'a'
+ && tolower((unsigned char)s1[2]) == 'n') {
s1 += 3;
while (s1 < end && isspace((unsigned char)*s1))
s1++;
Modified: trunk/src/jit/alpha/jit_defs.c
==============================================================================
--- trunk/src/jit/alpha/jit_defs.c (original)
+++ trunk/src/jit/alpha/jit_defs.c Thu Dec 25 07:18:09 2008
@@ -1 +1,8 @@
/* Stub file for RT#38929 fixes */
+
+/*
+ * Local variables:
+ * c-file-style: "parrot"
+ * End:
+ * vim: expandtab shiftwidth=4:
+ */
Modified: trunk/src/jit/amd64/jit_defs.c
==============================================================================
--- trunk/src/jit/amd64/jit_defs.c (original)
+++ trunk/src/jit/amd64/jit_defs.c Thu Dec 25 07:18:09 2008
@@ -352,3 +352,10 @@
{
return &arch_info;
}
+
+/*
+ * Local variables:
+ * c-file-style: "parrot"
+ * End:
+ * vim: expandtab shiftwidth=4:
+ */
Modified: trunk/src/jit/arm/jit_defs.c
==============================================================================
--- trunk/src/jit/arm/jit_defs.c (original)
+++ trunk/src/jit/arm/jit_defs.c Thu Dec 25 07:18:09 2008
@@ -1 +1,8 @@
/* Stub file for RT#38929 fixes */
+
+/*
+ * Local variables:
+ * c-file-style: "parrot"
+ * End:
+ * vim: expandtab shiftwidth=4:
+ */
Modified: trunk/src/jit/hppa/jit_defs.c
==============================================================================
--- trunk/src/jit/hppa/jit_defs.c (original)
+++ trunk/src/jit/hppa/jit_defs.c Thu Dec 25 07:18:09 2008
@@ -1 +1,8 @@
/* Stub file for RT#38929 fixes */
+
+/*
+ * Local variables:
+ * c-file-style: "parrot"
+ * End:
+ * vim: expandtab shiftwidth=4:
+ */
Modified: trunk/src/jit/i386/jit_defs.c
==============================================================================
--- trunk/src/jit/i386/jit_defs.c (original)
+++ trunk/src/jit/i386/jit_defs.c Thu Dec 25 07:18:09 2008
@@ -1 +1,8 @@
/* Stub file for RT#38929 fixes */
+
+/*
+ * Local variables:
+ * c-file-style: "parrot"
+ * End:
+ * vim: expandtab shiftwidth=4:
+ */
Modified: trunk/src/jit/ia64/jit_defs.c
==============================================================================
--- trunk/src/jit/ia64/jit_defs.c (original)
+++ trunk/src/jit/ia64/jit_defs.c Thu Dec 25 07:18:09 2008
@@ -1 +1,8 @@
/* Stub file for RT#38929 fixes */
+
+/*
+ * Local variables:
+ * c-file-style: "parrot"
+ * End:
+ * vim: expandtab shiftwidth=4:
+ */
Modified: trunk/src/jit/mips/jit_defs.c
==============================================================================
--- trunk/src/jit/mips/jit_defs.c (original)
+++ trunk/src/jit/mips/jit_defs.c Thu Dec 25 07:18:09 2008
@@ -1 +1,8 @@
/* Stub file for RT#38929 fixes */
+
+/*
+ * Local variables:
+ * c-file-style: "parrot"
+ * End:
+ * vim: expandtab shiftwidth=4:
+ */
Modified: trunk/src/jit/ppc/jit_defs.c
==============================================================================
--- trunk/src/jit/ppc/jit_defs.c (original)
+++ trunk/src/jit/ppc/jit_defs.c Thu Dec 25 07:18:09 2008
@@ -1 +1,8 @@
/* Stub file for RT#38929 fixes */
+
+/*
+ * Local variables:
+ * c-file-style: "parrot"
+ * End:
+ * vim: expandtab shiftwidth=4:
+ */
Modified: trunk/src/jit/skeleton/jit_defs.c
==============================================================================
--- trunk/src/jit/skeleton/jit_defs.c (original)
+++ trunk/src/jit/skeleton/jit_defs.c Thu Dec 25 07:18:09 2008
@@ -1 +1,8 @@
/* Stub file for RT#38929 fixes */
+
+/*
+ * Local variables:
+ * c-file-style: "parrot"
+ * End:
+ * vim: expandtab shiftwidth=4:
+ */
Modified: trunk/src/jit/sun4/jit_defs.c
==============================================================================
--- trunk/src/jit/sun4/jit_defs.c (original)
+++ trunk/src/jit/sun4/jit_defs.c Thu Dec 25 07:18:09 2008
@@ -1 +1,8 @@
/* Stub file for RT#38929 fixes */
+
+/*
+ * Local variables:
+ * c-file-style: "parrot"
+ * End:
+ * vim: expandtab shiftwidth=4:
+ */
