[svn:parrot] r44937 - branches/ops_pct/compilers/opsc/src/Ops

mikehh at svn.parrot.org mikehh at svn.parrot.org
Mon Mar 15 14:31:03 UTC 2010


Author: mikehh
Date: Mon Mar 15 14:31:02 2010
New Revision: 44937
URL: https://trac.parrot.org/parrot/changeset/44937

Log:
fix File.pm to pass pod_syntax.t

Modified:
   branches/ops_pct/compilers/opsc/src/Ops/File.pm

Modified: branches/ops_pct/compilers/opsc/src/Ops/File.pm
==============================================================================
--- branches/ops_pct/compilers/opsc/src/Ops/File.pm	Mon Mar 15 14:15:36 2010	(r44936)
+++ branches/ops_pct/compilers/opsc/src/Ops/File.pm	Mon Mar 15 14:31:02 2010	(r44937)
@@ -4,8 +4,6 @@
 
 # XXX Better to put this into docs/ somewhere.
 
-=begin
-
 =head1 NAME
 
 Ops::File - Ops To C Code Generation
@@ -163,14 +161,12 @@
 
 =over 4
 
-=end
+=cut
 
 class Ops::File is Hash;
 
 pir::load_bytecode('config.pbc');
 
-=begin
-
 =item C<new(@files)>
 
 Returns a new instance initialized by calling C<read_ops()> on each of
@@ -181,7 +177,7 @@
 Returns a new instance initialized by compiling C<$str> as the contents of an
 ops file.
 
-=end
+=cut
 
 method new(*@files, :$oplib!, :$nolines) {
     self<files>   := @files;
@@ -211,8 +207,6 @@
 }
 
 
-=begin
-
 =back
 
 =head2 Instance Methods
@@ -223,7 +217,7 @@
 
 Reads in the specified .ops file, gathering information about the ops.
 
-=end
+=cut
 
 method read_ops($file, $nolines) {
     $Ops::Compiler::Actions::OPLIB := self<oplib>;
@@ -276,8 +270,6 @@
     self<version>       := @bits;
 }
 
-=begin
-
 =back
 
 =head1 SEE ALSO
@@ -296,7 +288,7 @@
 
 =back
 
-=end
+=cut
 
 # Local Variables:
 #   mode: cperl


More information about the parrot-commits mailing list