[Moose-commits] r7583 - Class-MOP/trunk

[autarch at code2.0beta.co.uk]

Author: autarch
Date: 2009-02-08 08:47:38 -0800 (Sun, 08 Feb 2009)
New Revision: 7583

Modified:
   Class-MOP/trunk/MOP.xs
Log:
Add comment referring people looking at is_class_loaded to the pure
Perl version


Modified: Class-MOP/trunk/MOP.xs
===================================================================
--- Class-MOP/trunk/MOP.xs	2009-02-08 16:41:11 UTC (rev 7582)
+++ Class-MOP/trunk/MOP.xs	2009-02-08 16:47:38 UTC (rev 7583)
@@ -344,6 +344,9 @@
             PUSHs(newSVpv(name, 0));
         }
 
+/* This is some pretty grotty logic. It _should_ be parallel to the
+   pure Perl version in lib/Class/MOP.pm, so if you want to understand
+   it we suggest you start there. */
 void
 is_class_loaded(klass=&PL_sv_undef)
     SV *klass