]> git.vpit.fr Git - perl/modules/Variable-Magic.git/commitdiff
Prettify the default no-op callback
authorVincent Pit <vince@profvince.com>
Sat, 11 Aug 2012 10:27:57 +0000 (12:27 +0200)
committerVincent Pit <vince@profvince.com>
Sat, 11 Aug 2012 10:27:57 +0000 (12:27 +0200)
Magic.xs

index e45baeab02d807bb2a3fa7bea8ffba7662d85f89..14eab61f73c5e5afcc1d9169280c053c16add03c 100644 (file)
--- a/Magic.xs
+++ b/Magic.xs
@@ -1189,6 +1189,8 @@ STATIC int vmg_cb_call(pTHX_ SV *cb, unsigned int flags, SV *sv, ...) {
 #define vmg_cb_call3(I, OI, S, A1, A2, A3) \
         vmg_cb_call(aTHX_ (I), VMG_CB_FLAGS((OI), 3), (S), (A1), (A2), (A3))
 
+/* ... Default no-op magic callback ........................................ */
+
 STATIC int vmg_svt_default_noop(pTHX_ SV *sv, MAGIC *mg) {
  return 0;
 }