Author: infinoid
Date: Tue May 6 09:18:59 2008
New Revision: 27347
Modified:
trunk/languages/perl6/src/classes/Int.pir
Log:
[rakudo] Int.pir: add enough POD stubs to avoid a t/doc/pod.t test failure
Modified: trunk/languages/perl6/src/classes/Int.pir
==============================================================================
--- trunk/languages/perl6/src/classes/Int.pir (original)
+++ trunk/languages/perl6/src/classes/Int.pir Tue May 6 09:18:59 2008
@@ -8,6 +8,15 @@
.namespace [ 'Int' ]
+
+=head1 SUBROUTINES
+
+=over 4
+
+=item onload
+
+=cut
+
.sub 'onload' :anon :init :load
$P0 = subclass 'Integer', 'Int'
$P1 = get_hll_global 'Any'
@@ -19,12 +28,20 @@
.end
+=item ACCEPTS()
+
+=cut
+
.sub 'ACCEPTS' :method
.param num topic
.return 'infix:=='(topic, self)
.end
+=item clone()
+
+=cut
+
.sub 'clone' :method :vtable
.local pmc clone_type
clone_type = self.HOW()
@@ -46,6 +63,10 @@
.end
+=back
+
+=cut
+
# Local Variables:
# mode: pir
# fill-column: 100
