[svn:parrot] r49438 - trunk/src/runcore
mikehh at svn.parrot.org
mikehh at svn.parrot.org
Mon Oct 4 07:44:14 UTC 2010
Author: mikehh
Date: Mon Oct 4 07:44:13 2010
New Revision: 49438
URL: https://trac.parrot.org/parrot/changeset/49438
Log:
fix codetest failures - remove space before closing parenthesis,
remove trailing space and add function documention
Modified:
trunk/src/runcore/profiling.c
Modified: trunk/src/runcore/profiling.c
==============================================================================
--- trunk/src/runcore/profiling.c Mon Oct 4 05:30:44 2010 (r49437)
+++ trunk/src/runcore/profiling.c Mon Oct 4 07:44:13 2010 (r49438)
@@ -324,7 +324,7 @@
runcore->runcore_start = Parrot_hires_get_time();
/* if we're in a nested runloop, */
- if (runcore->level != 0)
+ if (runcore->level != 0)
store_postop_time(interp, runcore);
argv = VTABLE_get_pmc_keyed_int(interp, interp->iglobals, IGLOBALS_ARGV_LIST);
@@ -472,6 +472,17 @@
return pc;
}
+/*
+
+=item C<static void store_postop_time(PARROT_INTERP, Parrot_profiling_runcore_t
+*runcore)>
+
+Store the time in the op's running total'
+
+=cut
+
+*/
+
static void
store_postop_time(PARROT_INTERP, ARGIN(Parrot_profiling_runcore_t *runcore))
{
@@ -489,6 +500,17 @@
runcore->time[runcore->level] = runcore->runcore_start - runcore->op_start;
}
+/*
+
+=item C<static void store_cli(PARROT_INTERP, Parrot_profiling_runcore_t
+*runcore, PPROF_DATA* pprof_data, PMC* argv)>
+
+Store the cli information
+
+=cut
+
+*/
+
static void
store_cli(PARROT_INTERP, ARGIN(Parrot_profiling_runcore_t *runcore), ARGIN(PPROF_DATA* pprof_data),
ARGIN(PMC* argv))
@@ -513,6 +535,17 @@
Parrot_str_free_cstring(cli_cstr);
}
+/*
+
+=item C<static char* get_ns_cstr(PARROT_INTERP, Parrot_profiling_runcore_t
+*runcore, PMC* ctx_pmc)>
+
+Get the namespace information
+
+=cut
+
+*/
+
PARROT_MALLOC
PARROT_CANNOT_RETURN_NULL
static char*
@@ -525,7 +558,7 @@
STRING *sub_name, *full_ns, *ns_separator;
char *full_ns_cstr;
STRING *ns_names[MAX_NS_DEPTH];
- Parrot_Context *ctx = PMC_data_typed(ctx_pmc, Parrot_Context * );
+ Parrot_Context *ctx = PMC_data_typed(ctx_pmc, Parrot_Context *);
PMC *ns = ctx->current_namespace;
INTVAL i;
@@ -556,6 +589,17 @@
}
+/*
+
+=item C<static char* get_filename_cstr(PARROT_INTERP, Parrot_profiling_runcore_t
+*runcore, PMC* ctx_pmc, opcode_t *pc)>
+
+Get filename information as a c string
+
+=cut
+
+*/
+
PARROT_MALLOC
PARROT_CANNOT_RETURN_NULL
static char*
More information about the parrot-commits
mailing list