[svn:parrot] r49805 - trunk/src
petdance at svn.parrot.org
petdance at svn.parrot.org
Mon Nov 8 03:26:50 UTC 2010
Author: petdance
Date: Mon Nov 8 03:26:48 2010
New Revision: 49805
URL: https://trac.parrot.org/parrot/changeset/49805
Log:
consting
Modified:
trunk/src/exceptions.c
Modified: trunk/src/exceptions.c
==============================================================================
--- trunk/src/exceptions.c Mon Nov 8 03:09:04 2010 (r49804)
+++ trunk/src/exceptions.c Mon Nov 8 03:26:48 2010 (r49805)
@@ -114,7 +114,7 @@
/* In some cases we have a fatal exception before the IO system
* is completely initialized. Do some attempt to output the
* message to stderr, to help diagnosing. */
- int use_perr = !PMC_IS_NULL(Parrot_io_STDERR(interp));
+ const int use_perr = !PMC_IS_NULL(Parrot_io_STDERR(interp));
already_dying = 1;
/* flush interpreter output to get things printed in order */
@@ -124,7 +124,7 @@
Parrot_io_flush(interp, Parrot_io_STDERR(interp));
if (interp->pdb) {
- Interp * interpdeb = interp->pdb->debugger;
+ Interp * const interpdeb = interp->pdb->debugger;
if (interpdeb) {
Parrot_io_flush(interpdeb, Parrot_io_STDOUT(interpdeb));
Parrot_io_flush(interpdeb, Parrot_io_STDERR(interpdeb));
@@ -357,7 +357,7 @@
{
ASSERT_ARGS(Parrot_ex_throw_from_c)
- Parrot_runloop *return_point = interp->current_runloop;
+ Parrot_runloop * const return_point = interp->current_runloop;
opcode_t *address;
PMC * const handler =
Parrot_cx_find_handler_local(interp, exception);
@@ -368,8 +368,7 @@
if (Interp_debug_TEST(interp, PARROT_BACKTRACE_DEBUG_FLAG)) {
STRING * const exit_code = CONST_STRING(interp, "exit_code");
STRING * const msg = VTABLE_get_string(interp, exception);
- int exitcode = VTABLE_get_integer_keyed_str(interp,
- exception, exit_code);
+ const int exitcode = VTABLE_get_integer_keyed_str(interp, exception, exit_code);
Parrot_io_eprintf(interp,
"Parrot_ex_throw_from_c (severity:%d error:%d): %Ss\n",
More information about the parrot-commits
mailing list