[svn:parrot] r40895 - branches/pluggable_runcore/src/runcore

cotto at svn.parrot.org cotto at svn.parrot.org
Mon Aug 31 22:15:17 UTC 2009


Author: cotto
Date: Mon Aug 31 22:15:14 2009
New Revision: 40895
URL: https://trac.parrot.org/parrot/changeset/40895

Log:
[profiling] codingstd fixes

Modified:
   branches/pluggable_runcore/src/runcore/cores.c

Modified: branches/pluggable_runcore/src/runcore/cores.c
==============================================================================
--- branches/pluggable_runcore/src/runcore/cores.c	Mon Aug 31 20:48:43 2009	(r40894)
+++ branches/pluggable_runcore/src/runcore/cores.c	Mon Aug 31 22:15:14 2009	(r40895)
@@ -1115,13 +1115,16 @@
     runcore->prev_runloop_filename = postop_info.file;
 
     if (Profiling_first_op_TEST(runcore)) {
-        
-        PMC    *argv         = VTABLE_get_pmc_keyed_int(interp, interp->iglobals, IGLOBALS_ARGV_LIST);
+
+        PMC    *argv         = VTABLE_get_pmc_keyed_int(interp, interp->iglobals,
+                                                      IGLOBALS_ARGV_LIST);
+        PMC    *executable   = VTABLE_get_pmc_keyed_int(interp, interp->iglobals,
+                                                      IGLOBALS_EXECUTABLE);
         STRING *command_line = Parrot_str_join(interp, CONST_STRING(interp, " "), argv);
-        PMC    *executable   = VTABLE_get_pmc_keyed_int(interp, interp->iglobals, IGLOBALS_EXECUTABLE);
 
         /* The CLI line won't reflect any options passed to the parrot binary. */
-        fprintf(runcore->profile_fd, "CLI:%s %s\n", VTABLE_get_string(interp, executable)->strstart, command_line->strstart);
+        fprintf(runcore->profile_fd, "CLI:%s %s\n",
+                VTABLE_get_string(interp, executable)->strstart, command_line->strstart);
         fprintf(runcore->profile_fd, "F:%s\n", postop_info.file->strstart);
         fprintf(runcore->profile_fd, "CS:%s;%s at 0x%X,0x%X\n",
                 VTABLE_get_string(interp, CONTEXT(interp)->current_namespace)->strstart,
@@ -1172,7 +1175,8 @@
         if (!preop_file_name)  preop_file_name  = unknown_file;
         if (!postop_file_name) postop_file_name = unknown_file;
 
-        if (Profiling_new_file_TEST(runcore) || Parrot_str_compare(interp, preop_file_name, postop_file_name)) {
+        if (Profiling_new_file_TEST(runcore) ||
+            Parrot_str_compare(interp, preop_file_name, postop_file_name)) {
             Profiling_new_file_CLEAR(runcore);
             fprintf(runcore->profile_fd, "F:%s\n", postop_file_name->strstart);
         }
@@ -1198,7 +1202,8 @@
     } /* while (pc) */
 
     if (runcore->level == 0) {
-        fprintf(stderr, "\nPROFILING RUNCORE: Wrote profile to %s .\n", runcore->profile_filename->strstart);
+        fprintf(stderr, "\nPROFILING RUNCORE: Wrote profile to %s .\n",
+                runcore->profile_filename->strstart);
     }
     Profiling_exit_check_SET(runcore);
     runcore->runcore_finish = Parrot_hires_get_time();;


More information about the parrot-commits mailing list