--- rxvt-unicode/src/rxvtperl.xs	2011/07/01 19:07:08	1.142
+++ rxvt-unicode/src/rxvtperl.xs	2011/07/29 08:35:09	1.143
@@ -801,8 +801,8 @@
 #   endif
   };
 
-  for (civ = const_iv + ecb_array_length (const_iv); civ-- > const_iv; )
-    newCONSTSUB (stash, (char *)civ->name, newSViv (civ->iv));
+  for (civ = const_iv + ecb_array_length (const_iv); civ > const_iv; civ--)
+    newCONSTSUB (stash, (char *)civ[-1].name, newSViv (civ[-1].iv));
 }
 
 void