[svn:parrot] r48525 - trunk/src/pmc

[NotFound at svn.parrot.org]

Author: NotFound
Date: Mon Aug 16 17:14:13 2010
New Revision: 48525
URL: https://trac.parrot.org/parrot/changeset/48525

Log:
[cage] reorganize and improve pod of Null PMC

Modified:
   trunk/src/pmc/null.pmc

Modified: trunk/src/pmc/null.pmc
==============================================================================
--- trunk/src/pmc/null.pmc	Mon Aug 16 16:32:35 2010	(r48524)
+++ trunk/src/pmc/null.pmc	Mon Aug 16 17:14:13 2010	(r48525)
@@ -11,10 +11,6 @@
 This simply creates a way of catching C<NULL> register accesses without
 really slowing down the bytecode execution.
 
-=head2 Methods
-
-=over 4
-
 =cut
 
 */
@@ -32,30 +28,14 @@
 /* Don't modify between HEADERIZER BEGIN / HEADERIZER END.  Your changes will be lost. */
 /* HEADERIZER END: static */
 
-/*
-
-=item C<static void null_pmc_access(PARROT_INTERP, int index)>
-
-
-
-=cut
-
-*/
-
-PARROT_DOES_NOT_RETURN
-static void
-null_pmc_access(PARROT_INTERP, int index)
-{
-    ASSERT_ARGS(null_pmc_access)
-    Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_NULL_REG_ACCESS,
-            "Null PMC access in %s()",
-            Parrot_get_vtable_name(interp, index));
-}
-
 pmclass Null singleton {
 
 /*
 
+=head2 Vtable functions
+
+=over 4
+
 =item C<void init()>
 
 Overrides the default to do nothing.
@@ -102,9 +82,9 @@
 
 =item C<PMC *find_method(STRING *method_name)>
 
-=cut
+Gives a more informative message than the automaticaly generated version.
 
-Gives a more informative message than the automaticaaly generated version.
+=cut
 
 */
 
@@ -120,6 +100,32 @@
 
 =back
 
+=head2 Auxiliar functions
+
+=over 4
+
+=item C<static void null_pmc_access(PARROT_INTERP, int index)>
+
+Throws the Null PMC access exception.
+
+=cut
+
+*/
+
+PARROT_DOES_NOT_RETURN
+static void
+null_pmc_access(PARROT_INTERP, int index)
+{
+    ASSERT_ARGS(null_pmc_access)
+    Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_NULL_REG_ACCESS,
+            "Null PMC access in %s()",
+            Parrot_get_vtable_name(interp, index));
+}
+
+/*
+
+=back
+
 =cut
 
 */