Author: fperrad
Date: Fri May 25 02:09:22 2007
New Revision: 18639
Modified:
trunk/compilers/past-pm/POST/Node.pir
Log:
[PAST-pm]
- add POD skeletons
Modified: trunk/compilers/past-pm/POST/Node.pir
==============================================================================
--- trunk/compilers/past-pm/POST/Node.pir (original)
+++ trunk/compilers/past-pm/POST/Node.pir Fri May 25 02:09:22 2007
@@ -50,6 +50,12 @@
C<POST::Node> is the base class for all POST nodes. It's derived from class
C<PAST::Node> (see F<compilers/past-pm/PAST/Node.pir>).
+=over 4
+
+=item result([value])
+
+Get/set
+
=cut
.namespace [ 'POST::Node' ]
@@ -74,6 +80,10 @@
.end
+=item push_pirop(pirop [,arglist :slurpy] [,adverbs :slurpy :named])
+
+=cut
+
.sub 'push_pirop' :method
.param pmc pirop
.param pmc arglist :slurpy
@@ -98,6 +108,10 @@
.end
+=item cpir()
+
+=cut
+
.sub 'cpir' :method
.local pmc code, iter
code = new 'PGE::CodeString'
@@ -114,8 +128,16 @@
.end
+=back
+
=head2 POST::Ops
+C<POST::Ops> is a container of C<POST::Node>.
+
+=over 4
+
+=item pir()
+
=cut
.namespace [ 'POST::Ops' ]
@@ -125,8 +147,18 @@
.end
+=back
+
=head2 POST::Op
+C<POST::Op> nodes represents any PIR opcodes.
+
+=over 4
+
+=item pirop([opcode])
+
+Get/set
+
=cut
.namespace [ 'POST::Op' ]
@@ -137,6 +169,10 @@
.return self.'attr'('pirop', value, has_value)
.end
+=item arglist(arglist)
+
+=cut
+
.sub 'arglist' :method
.param pmc arglist :slurpy
.local int argc
@@ -158,6 +194,10 @@
.end
+=item pir()
+
+=cut
+
.sub 'pir' :method
.local pmc code, arglist
code = self.'cpir'()
@@ -194,8 +234,18 @@
.end
+=back
+
=head2 POST::Label
+C<POST::Label> nodes represent PIR labels.
+
+=over 4
+
+=item result([value])
+
+Get/set
+
=cut
.namespace [ 'POST::Label' ]
@@ -216,6 +266,10 @@
.end
+=item pir()
+
+=cut
+
.sub 'pir' :method
.local string code
.local string value
@@ -227,8 +281,16 @@
.end
+=back
+
=head2 POST::Sub
+C<POST::Sub> nodes represent PIR subroutines.
+
+=over 4
+
+=item pir()
+
=cut
.namespace [ 'POST::Sub' ]
@@ -322,6 +384,12 @@
.end
+=item outer([outer])
+
+Get/set
+
+=cut
+
.sub 'outer' :method
.param pmc value :optional
.param int has_value :opt_flag
@@ -329,6 +397,12 @@
.end
+=item pragma([pragma])
+
+Get/set
+
+=cut
+
.sub 'pragma' :method
.param pmc value :optional
.param int has_value :opt_flag
@@ -336,6 +410,12 @@
.end
+=item blocktype([type])
+
+Get/set
+
+=cut
+
.sub 'blocktype' :method
.param pmc value :optional
.param int has_value :opt_flag
@@ -343,6 +423,12 @@
.end
+=item paramcode([paramcode])
+
+Get/set
+
+=cut
+
.sub 'paramcode' :method
.param pmc value :optional
.param int has_value :opt_flag
@@ -350,6 +436,12 @@
.end
+=item compiler([name])
+
+Get/set
+
+=cut
+
.sub 'compiler' :method
.param pmc value :optional
.param int has_value :opt_flag
@@ -357,6 +449,10 @@
.end
+=item push_param(STR regtype, STR pname, STR flags, INT has_flags)
+
+=cut
+
.sub 'push_param' :method
.param string regtype
.param string pname
@@ -377,6 +473,8 @@
.end
+=back
+
=head1 AUTHOR
Patrick Michaud <[EMAIL PROTECTED]> is the author and maintainer.
