This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
dquote_static.c: Clarify comment
authorKarl Williamson <public@khwilliamson.com>
Sun, 17 Jun 2012 19:45:19 +0000 (13:45 -0600)
committerKarl Williamson <public@khwilliamson.com>
Wed, 20 Jun 2012 20:08:42 +0000 (14:08 -0600)
dquote_static.c

index 4f839ee..4ab05cf 100644 (file)
@@ -138,7 +138,7 @@ S_grok_bslash_o(pTHX_ const char *s,
     }
 
     /* Return past the '}' no matter what is inside the braces */
     }
 
     /* Return past the '}' no matter what is inside the braces */
-    *len = e - s + 2;  /* 2 = 1 for the o + 1 for the '}' */
+    *len = e - s + 2;  /* 2 = 1 for the 'o' + 1 for the '}' */
 
     s++;    /* Point to first digit */
 
 
     s++;    /* Point to first digit */