Add a comment in the initializing loop in su_init()
authorVincent Pit <vince@profvince.com>
Tue, 18 Aug 2015 13:05:29 +0000 (10:05 -0300)
committerVincent Pit <vince@profvince.com>
Tue, 18 Aug 2015 13:05:29 +0000 (10:05 -0300)
Upper.xs

index ec3ecfe..3ba3348 100644 (file)
--- a/Upper.xs
+++ b/Upper.xs
@@ -1174,6 +1174,7 @@ static I32 su_init(pTHX_ void *ud, I32 cxix, I32 size) {
  PL_scopestack[base] += size;
  for (i = 1; i < depth; ++i) {
   I32 j = i + base;
+  /* origin[depth - i] == PL_scopestack[PL_scopestack_ix - i] */
   origin[i] = PL_scopestack[j];
   PL_scopestack[j] += offset;
  }