From: Dave Rolsky <autarch@urth.org>
Date: Sun, 8 Feb 2009 16:47:38 +0000 (+0000)
Subject: Add comment referring people looking at is_class_loaded to the pure
X-Git-Tag: 0.77~11
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1ed67f749ac4f9d4f8e5df0d8184e28aa1a2187f;p=gitmo%2FClass-MOP.git

Add comment referring people looking at is_class_loaded to the pure
Perl version
---

diff --git a/MOP.xs b/MOP.xs
index 07b2fb8..315213e 100644
--- a/MOP.xs
+++ b/MOP.xs
@@ -344,6 +344,9 @@ get_code_info(coderef)
             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