Author: chromatic
Date: Sat Dec 20 20:27:56 2008
New Revision: 34179
Modified:
trunk/languages/perl6/src/pmc/perl6str.pmc
Log:
[Rakudo] Turned a C++-style comment into a C-style comment so as not to confuse
old, broken, vendor-supplied compilers stuck in the twentieth century.
Modified: trunk/languages/perl6/src/pmc/perl6str.pmc
==============================================================================
--- trunk/languages/perl6/src/pmc/perl6str.pmc (original)
+++ trunk/languages/perl6/src/pmc/perl6str.pmc Sat Dec 20 20:27:56 2008
@@ -27,10 +27,11 @@
static
FLOATVAL
parse_number(const char **start, const char *stop, FLOATVAL radix) {
- FLOATVAL number = 0.0;
- const char *pos = *start;
- int underscore_skip = 0;
- //continue until the end or until we've hit a non-digit
+ const char *pos = *start;
+ FLOATVAL number = 0.0;
+ int underscore_skip = 0;
+
+ /* continue until the end or until we've hit a non-digit */
while (pos + underscore_skip < stop) {
unsigned int current = *(pos + underscore_skip);
if (isdigit((unsigned char)current))