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

darbelo at svn.parrot.org darbelo at svn.parrot.org
Tue Jun 1 00:42:08 UTC 2010


Author: darbelo
Date: Tue Jun  1 00:42:07 2010
New Revision: 47244
URL: https://trac.parrot.org/parrot/changeset/47244

Log:
Boostrap 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  1 00:35:57 2010	(r47243)
+++ branches/gsoc_nfg/src/ops/core_ops.c	Tue Jun  1 00:42:07 2010	(r47244)
@@ -25960,6 +25960,9 @@
           case STRINGINFO_STRLEN:
             IREG(1) = SREG(2)->strlen;
             break;
+          case STRINGINFO_EXTRA:
+            IREG(1) = SREG(2)->extra;
+            break;
           default:
             {
                 opcode_t *handler = Parrot_ex_throw_from_op_args(interp, NULL,
@@ -25996,6 +25999,9 @@
           case STRINGINFO_STRLEN:
             IREG(1) = CONST(2)->u.string->strlen;
             break;
+          case STRINGINFO_EXTRA:
+            IREG(1) = CONST(2)->u.string->extra;
+            break;
           default:
             {
                 opcode_t *handler = Parrot_ex_throw_from_op_args(interp, NULL,
@@ -26032,6 +26038,9 @@
           case STRINGINFO_STRLEN:
             IREG(1) = SREG(2)->strlen;
             break;
+          case STRINGINFO_EXTRA:
+            IREG(1) = SREG(2)->extra;
+            break;
           default:
             {
                 opcode_t *handler = Parrot_ex_throw_from_op_args(interp, NULL,
@@ -26068,6 +26077,9 @@
           case STRINGINFO_STRLEN:
             IREG(1) = CONST(2)->u.string->strlen;
             break;
+          case STRINGINFO_EXTRA:
+            IREG(1) = CONST(2)->u.string->extra;
+            break;
           default:
             {
                 opcode_t *handler = Parrot_ex_throw_from_op_args(interp, NULL,


More information about the parrot-commits mailing list