Author: moritz
Date: Tue Dec 9 14:52:46 2008
New Revision: 33730
Modified:
trunk/languages/perl6/src/parser/actions.pm
trunk/src/pmc/filehandle.pmc
Log:
[codingstd] remove trailing whitespaces
Modified: trunk/languages/perl6/src/parser/actions.pm
==============================================================================
--- trunk/languages/perl6/src/parser/actions.pm (original)
+++ trunk/languages/perl6/src/parser/actions.pm Tue Dec 9 14:52:46 2008
@@ -2918,7 +2918,7 @@
$rhs
)
);
-
+
# Nothing to emit at this point.
$past := PAST::Stmts.new();
}
Modified: trunk/src/pmc/filehandle.pmc
==============================================================================
--- trunk/src/pmc/filehandle.pmc (original)
+++ trunk/src/pmc/filehandle.pmc Tue Dec 9 14:52:46 2008
@@ -304,7 +304,7 @@
#else
UINTVAL len;
- if (got_prompt)
+ if (got_prompt)
fprintf(stderr, "%s", prompt->strstart);
if (!(PARROT_FILEHANDLE(SELF)->flags & PIO_F_LINEBUF))
@@ -316,7 +316,7 @@
len = string_length(INTERP, string_result);
if (len < 1)
RETURN(PMC *PMCNULL);
- while (len > 0 &&
+ while (len > 0 &&
(((char*)string_result->strstart)[len - 1] == '\n' ||
((char*)string_result->strstart)[len - 1] == '\r')) {
--len;