[svn:parrot] r41948 - trunk/src/runcore

cotto at svn.parrot.org cotto at svn.parrot.org
Tue Oct 20 05:59:55 UTC 2009


Author: cotto
Date: Tue Oct 20 05:59:54 2009
New Revision: 41948
URL: https://trac.parrot.org/parrot/changeset/41948

Log:
[build] address some compiler warnings

Modified:
   trunk/src/runcore/profiling.c

Modified: trunk/src/runcore/profiling.c
==============================================================================
--- trunk/src/runcore/profiling.c	Tue Oct 20 04:23:29 2009	(r41947)
+++ trunk/src/runcore/profiling.c	Tue Oct 20 05:59:54 2009	(r41948)
@@ -258,12 +258,14 @@
             Parrot_ex_throw_from_c_args(interp, NULL, 1,
                     "attempt to access code outside of current code segment");
 
-        preop_line = parrot_hash_get(interp, runcore->line_cache, CONTEXT(interp)->current_pc);
-        if (preop_line == NULL) {
+        preop_line = PTR2INTVAL(
+                parrot_hash_get(interp, runcore->line_cache, CONTEXT(interp)->current_pc));
+        if (preop_line == 0) {
             preop_line = Parrot_Sub_get_line_from_pc(interp,
                     Parrot_pcc_get_sub(interp, CURRENT_CONTEXT(interp)),
                     CONTEXT(interp)->current_pc);
-            parrot_hash_put(interp, runcore->line_cache, CONTEXT(interp)->current_pc, preop_line);
+            parrot_hash_put(interp, runcore->line_cache,
+                            CONTEXT(interp)->current_pc, (void *) preop_line);
         }
 
         CONTEXT(interp)->current_pc = pc;


More information about the parrot-commits mailing list