[svn:parrot] r39401 - trunk/src

[cotto at svn.parrot.org]

Author: cotto
Date: Fri Jun  5 07:59:28 2009
New Revision: 39401
URL: https://trac.parrot.org/parrot/changeset/39401

Log:
[freeze] minor freeze code readability improvement

Modified:
   trunk/src/pmc_freeze.c

Modified: trunk/src/pmc_freeze.c
==============================================================================
--- trunk/src/pmc_freeze.c	Fri Jun  5 07:05:38 2009	(r39400)
+++ trunk/src/pmc_freeze.c	Fri Jun  5 07:59:28 2009	(r39401)
@@ -742,8 +742,11 @@
 op_append(PARROT_INTERP, ARGIN(STRING *s), opcode_t b, size_t len)
 {
     ASSERT_ARGS(op_append)
+    char *str_pos;
+
     op_check_size(interp, s, len);
-    *((opcode_t *)((ptrcast_t)s->strstart + s->bufused)) = b;
+    str_pos = s->strstart + s->bufused;
+    *((opcode_t *)(str_pos)) = b;
     s->bufused += len;
     s->strlen += len;
 }