[svn:parrot] r40306 - trunk/src/ops

[NotFound at svn.parrot.org]

Author: NotFound
Date: Tue Jul 28 14:09:40 2009
New Revision: 40306
URL: https://trac.parrot.org/parrot/changeset/40306

Log:
[cage] use conversion macro in get_label, jimmy++

Modified:
   trunk/src/ops/experimental.ops

Modified: trunk/src/ops/experimental.ops
==============================================================================
--- trunk/src/ops/experimental.ops	Tue Jul 28 13:01:55 2009	(r40305)
+++ trunk/src/ops/experimental.ops	Tue Jul 28 14:09:40 2009	(r40306)
@@ -72,8 +72,8 @@
 }
 
 inline op get_label(out INT, invar PMC) {
-    void * ptr = VTABLE_get_pointer(interp, $2);
-    $1         =  (INTVAL)ptr;
+    void * const ptr = VTABLE_get_pointer(interp, $2);
+    $1 =  PTR2INTVAL(ptr);
 }
 
 =head1 COPYRIGHT