r19187@ata: rafl | 2005-11-05 03:52:46 +0100

* Some POD fixes. git-svn-id: https://svn.parrot.org/parrot/trunk@9793 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
parrot · Nov 5, 2005 · acb120b · acb120b
1 parent 07934b6
commit acb120b
Show file tree

Hide file tree

Showing 4 changed files with 7 additions and 9 deletions.
diff --git a/ops/cmp.ops b/ops/cmp.ops
@@ -144,8 +144,6 @@ op eq_addr(in PMC, in PMC, labelconst INT) :base_core {
   goto NEXT();
 }
 
-=cut
-
 ########################################
 
 =item B<ne>(in INT, in INT, labelconst INT)

diff --git a/ops/core.ops b/ops/core.ops
@@ -535,7 +535,13 @@ op set_returns(inconst PMC) {
 
 =head2 Address manipulation
 
-=over 4 ########################################
+=for clarity
+
+########################################
+
+=cut
+
+=over 4
 
 =item B<set_addr>(out INT, labelconst INT)
 

diff --git a/ops/object.ops b/ops/object.ops
@@ -268,8 +268,6 @@ op subclass(out PMC, in STR) :object_classes {
   goto NEXT();
 }
 
-=cut
-
 =item B<getclass>(out PMC, in STR)
 
 Find the PMC for a class, by name. Note that this is a one-level hash, so for

diff --git a/ops/string.ops b/ops/string.ops
@@ -280,8 +280,6 @@ inline op index(out INT, in STR, in STR, in INT) :base_core {
 
 ########################################
 
-=cut
-
 op DELETED_pack(inout STR, in INT, in INT) :base_core {
     goto NEXT();
 }
@@ -549,8 +547,6 @@ op split(out PMC, in STR, in STR) :base_core {
     goto NEXT();
 }
 
-=cut
-
 op DELETED_isnull(in STR, labelconst INT) :base_core {
   goto NEXT();
 }