[svn:parrot] r44886 - trunk/src/pmc

mikehh at svn.parrot.org mikehh at svn.parrot.org
Fri Mar 12 00:44:40 UTC 2010


Author: mikehh
Date: Fri Mar 12 00:44:36 2010
New Revision: 44886
URL: https://trac.parrot.org/parrot/changeset/44886

Log:
fix codetest failure - line length

Modified:
   trunk/src/pmc/os.pmc

Modified: trunk/src/pmc/os.pmc
==============================================================================
--- trunk/src/pmc/os.pmc	Thu Mar 11 22:28:12 2010	(r44885)
+++ trunk/src/pmc/os.pmc	Fri Mar 12 00:44:36 2010	(r44886)
@@ -1,5 +1,5 @@
 /*
-Copyright (C) 2001-2009, Parrot Foundation.
+Copyright (C) 2001-2010, Parrot Foundation.
 $Id$
 
 =head1 NAME
@@ -504,8 +504,10 @@
         HANDLE hFind = INVALID_HANDLE_VALUE;
 
         /* Add \* to the directory name and start search. */
-        STRING *last_char = Parrot_str_substr(interp, path, Parrot_str_length(interp, path) - 1, 1, NULL, 0);
-        int trailing_slash = Parrot_str_equal(interp, last_char, string_from_literal(interp, "\\")) ||
+        STRING *last_char = Parrot_str_substr(interp, path,
+                                              Parrot_str_length(interp, path) - 1, 1, NULL, 0);
+        int trailing_slash = Parrot_str_equal(interp, last_char, string_from_literal(interp, "\\"))
+                             ||
                              Parrot_str_equal(interp, last_char, string_from_literal(interp, "/"));
         cpath = Parrot_str_to_cstring(interp, Parrot_str_concat(interp,
                 path, string_from_literal(interp, trailing_slash ? "*" : "\\*"), 0));


More information about the parrot-commits mailing list