[svn:parrot] r47634 - branches/gsoc_nfg/src/ops

darbelo at svn.parrot.org darbelo at svn.parrot.org
Tue Jun 15 00:38:58 UTC 2010


Author: darbelo
Date: Tue Jun 15 00:38:58 2010
New Revision: 47634
URL: https://trac.parrot.org/parrot/changeset/47634

Log:
Bootstrap ops.

Modified:
   branches/gsoc_nfg/src/ops/core_ops.c

Modified: branches/gsoc_nfg/src/ops/core_ops.c
==============================================================================
--- branches/gsoc_nfg/src/ops/core_ops.c	Tue Jun 15 00:34:39 2010	(r47633)
+++ branches/gsoc_nfg/src/ops/core_ops.c	Tue Jun 15 00:38:58 2010	(r47634)
@@ -21840,7 +21840,7 @@
             IREG(1) = SREG(2)->strlen;
             break;
           case STRINGINFO_EXTRA:
-            IREG(1) = SREG(2)->extra;
+            IREG(1) = PTR2UINTVAL(SREG(2)->extra);
             break;
           default:
             {
@@ -21879,7 +21879,7 @@
             IREG(1) = CONST(2)->u.string->strlen;
             break;
           case STRINGINFO_EXTRA:
-            IREG(1) = CONST(2)->u.string->extra;
+            IREG(1) = PTR2UINTVAL(CONST(2)->u.string->extra);
             break;
           default:
             {
@@ -21918,7 +21918,7 @@
             IREG(1) = SREG(2)->strlen;
             break;
           case STRINGINFO_EXTRA:
-            IREG(1) = SREG(2)->extra;
+            IREG(1) = PTR2UINTVAL(SREG(2)->extra);
             break;
           default:
             {
@@ -21957,7 +21957,7 @@
             IREG(1) = CONST(2)->u.string->strlen;
             break;
           case STRINGINFO_EXTRA:
-            IREG(1) = CONST(2)->u.string->extra;
+            IREG(1) = PTR2UINTVAL(CONST(2)->u.string->extra);
             break;
           default:
             {


More information about the parrot-commits mailing list