[svn:parrot] r36372 - in trunk: compilers/imcc docs/pdds docs/pdds/draft src/io src/pmc

Infinoid at svn.parrot.org Infinoid at svn.parrot.org
Thu Feb 5 06:23:39 UTC 2009


Author: Infinoid
Date: Thu Feb  5 06:23:38 2009
New Revision: 36372
URL: https://trac.parrot.org/parrot/changeset/36372

Log:
[cage] Fix some codetest failures.

Modified:
   trunk/compilers/imcc/imcc.y
   trunk/docs/pdds/draft/pdd30_install.pod
   trunk/docs/pdds/pdd28_strings.pod
   trunk/src/io/api.c
   trunk/src/pmc/stringhandle.pmc

Modified: trunk/compilers/imcc/imcc.y
==============================================================================
--- trunk/compilers/imcc/imcc.y	Thu Feb  5 03:57:19 2009	(r36371)
+++ trunk/compilers/imcc/imcc.y	Thu Feb  5 06:23:38 2009	(r36372)
@@ -739,7 +739,7 @@
 add_pcc_named_arg_var(PARROT_INTERP, ARGMOD(SymReg *cur_call),
     ARGIN(SymReg *name), ARGIN(SymReg *value))
 {
-    ASSERT_ARGS(add_pcc_named_param_var)
+    ASSERT_ARGS(add_pcc_named_arg_var)
     name->type |= VT_NAMED;
     add_pcc_arg(cur_call, name);
     add_pcc_arg(cur_call, value);

Modified: trunk/docs/pdds/draft/pdd30_install.pod
==============================================================================
--- trunk/docs/pdds/draft/pdd30_install.pod	Thu Feb  5 03:57:19 2009	(r36371)
+++ trunk/docs/pdds/draft/pdd30_install.pod	Thu Feb  5 06:23:38 2009	(r36372)
@@ -75,9 +75,9 @@
 
 Where F<abc> is a symlink to the F<parrot> executable. On platforms that don't
 have symlinks, F<abc> may be a copy of the F<parrot> executable. On general
-principles, languages should not install themselves with the same name as their
-"real" counterpart, but should provide a build option to do so (so, the default
-installed executable for Python on Parrot should be F<pynie> or
+principles, languages should not install themselves with the same name as
+their "real" counterpart, but should provide a build option to do so (so, the
+default installed executable for Python on Parrot should be F<pynie> or
 F<parrot-python> but not F<python>).
 
 =item F</usr/lib/parrot/<version>/languages/*>
@@ -86,8 +86,8 @@
 their own set of libraries, and F<dynpmc> for dynamic pmcs.
 
 It is recommended that languages follow a standard pattern in installing their
-libraries so a bytecode compiled version of a module in the C<mylang> HLL named
-C<['Foo';'Bar']> is stored in
+libraries so a bytecode compiled version of a module in the C<mylang> HLL
+named C<['Foo';'Bar']> is stored in
 F<usr/lib/parrot/<version>/languages/<mylang>/library/Foo/Bar.pbc>
 
 =item F</usr/lib/parrot/tools/>
@@ -283,8 +283,9 @@
 
 Avoid already loaded pbc files.
 
-Source loading PIR statements like C<loadlib> and C<load_bytecode> should cache
-the file name and skip the file if it has already been loaded (as in perl5)
+Source loading PIR statements like C<loadlib> and C<load_bytecode> should
+cache the file name and skip the file if it has already been loaded (as in
+perl5) 
 
 B<Fix 3>: pbc_merge fixups
 

Modified: trunk/docs/pdds/pdd28_strings.pod
==============================================================================
--- trunk/docs/pdds/pdd28_strings.pod	Thu Feb  5 03:57:19 2009	(r36371)
+++ trunk/docs/pdds/pdd28_strings.pod	Thu Feb  5 06:23:38 2009	(r36372)
@@ -553,9 +553,9 @@
 
 Compare two strings, return 0 if they are equal, 1 if they are not equal.
 
-{{DEPRECATION NOTE: The return value of 'Parrot_str_equal' is reversed from the
-old logic, but 'Parrot_str_not_equal' is provided as a drop-in replacement
-for the old function.}}
+{{DEPRECATION NOTE: The return value of 'Parrot_str_equal' is reversed from
+the old logic, but 'Parrot_str_not_equal' is provided as a drop-in
+replacement for the old function.}}
 
 =head3 Parrot_str_grapheme_equal
 

Modified: trunk/src/io/api.c
==============================================================================
--- trunk/src/io/api.c	Thu Feb  5 03:57:19 2009	(r36371)
+++ trunk/src/io/api.c	Thu Feb  5 06:23:38 2009	(r36372)
@@ -50,6 +50,7 @@
 PMC *
 Parrot_io_stdhandle(PARROT_INTERP, INTVAL fileno, ARGIN_NULLOK(PMC *newhandle))
 {
+    ASSERT_ARGS(Parrot_io_stdhandle)
     PMC * result = PMCNULL;
     if (fileno == PIO_STDIN_FILENO || fileno == PIO_STDOUT_FILENO ||
             fileno == PIO_STDERR_FILENO) {

Modified: trunk/src/pmc/stringhandle.pmc
==============================================================================
--- trunk/src/pmc/stringhandle.pmc	Thu Feb  5 03:57:19 2009	(r36371)
+++ trunk/src/pmc/stringhandle.pmc	Thu Feb  5 06:23:38 2009	(r36372)
@@ -339,7 +339,8 @@
             STRING *encoding;
             GET_ATTR_encoding(INTERP, SELF, encoding);
             if (!STRING_IS_NULL(encoding) &&
-                    Parrot_str_not_equal(INTERP, encoding, Parrot_str_new_constant(INTERP, "utf8")) == 0)
+                    Parrot_str_not_equal(INTERP, encoding,
+                        Parrot_str_new_constant(INTERP, "utf8")) == 0)
                 string_result = string_make(INTERP, "", 0, "unicode", 0);
             else
                 string_result = Parrot_str_new_constant(INTERP, "");


More information about the parrot-commits mailing list