]> git.vpit.fr Git - perl/modules/autovivification.git/blobdiff - autovivification.xs
Correct a copypasted comment
[perl/modules/autovivification.git] / autovivification.xs
index 9884389bd99370dd398e8a812bfd88e6172d4bcf..7a175eb3640552764b4c618cb7d585136dbeee39 100644 (file)
@@ -157,9 +157,9 @@ static SV *a_vivify_ref(pTHX_ SV *sv, int to_hash) {
 # define A_CHECK_LOCK   OP_REFCNT_LOCK
 # define A_CHECK_UNLOCK OP_REFCNT_UNLOCK
 #else
-/* Before perl 5.9.3, indirect_ck_*() calls are already protected by the
- * A_LOADED mutex, which falls back to the OP_REFCNT mutex. Make sure we don't
- * lock it twice. */
+/* Before perl 5.9.3, a_ck_*() calls are already protected by the A_LOADED
+ * mutex, which falls back to the OP_REFCNT mutex. Make sure we don't lock it
+ * twice. */
 # define A_CHECK_LOCK   NOOP
 # define A_CHECK_UNLOCK NOOP
 #endif
@@ -1178,7 +1178,7 @@ do_HV_helem:
         break;
        case A_HINT_STORE:
         sv = a_do_pp_hfetch_lv(sv, key);
-       break;
+        break;
        case A_HINT_EXISTS:
         sv = a_do_pp_hexists(sv, key);
         break;