develooper Front page | perl.cvs.parrot | Postings from January 2009

[svn:parrot] r34986 - branches/bcanno/src

From:
jonathan
Date:
January 5, 2009 07:09
Subject:
[svn:parrot] r34986 - branches/bcanno/src
Message ID:
20090105150917.E55DDCB9F9@x12.develooper.com
Author: jonathan
Date: Mon Jan  5 07:09:17 2009
New Revision: 34986

Modified:
   branches/bcanno/src/packfile.c

Log:
[bcanno] Resolve a merge conflict.

Modified: branches/bcanno/src/packfile.c
==============================================================================
--- branches/bcanno/src/packfile.c	(original)
+++ branches/bcanno/src/packfile.c	Mon Jan  5 07:09:17 2009
@@ -2604,44 +2604,13 @@
 
     Parrot_io_printf(interp, "\n  mappings => [\n");
     for (i = 0; i < debug->num_mappings; i++) {
-<<<<<<< .working
         char *filename = string_to_cstring(interp, PF_CONST(debug->code,
                    debug->mappings[i]->filename)->u.string);;
-        PIO_printf(interp, "    #%d\n    [\n", i);
-        PIO_printf(interp, "        OFFSET => %d,\n",
-=======
         Parrot_io_printf(interp, "    #%d\n    [\n", i);
         Parrot_io_printf(interp, "        OFFSET => %d,\n",
->>>>>>> .merge-right.r34983
                    debug->mappings[i]->offset);
-<<<<<<< .working
-        PIO_printf(interp, "        FILENAME => %s\n", filename);
+        Parrot_io__printf(interp, "        FILENAME => %s\n", filename);
         string_cstring_free(filename);
-=======
-        switch (debug->mappings[i]->mapping_type) {
-            case PF_DEBUGMAPPINGTYPE_NONE:
-                Parrot_io_printf(interp, "        MAPPINGTYPE => NONE\n");
-                break;
-            case PF_DEBUGMAPPINGTYPE_FILENAME:
-                {
-                char *filename;
-
-                Parrot_io_printf(interp, "        MAPPINGTYPE => FILENAME,\n");
-                filename = string_to_cstring(interp, PF_CONST(debug->code,
-                           debug->mappings[i]->u.filename)->u.string);
-                Parrot_io_printf(interp, "        FILENAME => %s\n", filename);
-                string_cstring_free(filename);
-                }
-                break;
-            case PF_DEBUGMAPPINGTYPE_SOURCESEG:
-                Parrot_io_printf(interp, "        MAPPINGTYPE => SOURCESEG,\n");
-                Parrot_io_printf(interp, "        SOURCESEG => %d\n",
-                           debug->mappings[i]->u.source_seg);
-                break;
-            default:
-                break;
-        }
->>>>>>> .merge-right.r34983
         Parrot_io_printf(interp, "    ],\n");
     }
 



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About