Súbor: [Platon] / iotta / Iotta / Elem.pm (stiahnutie)
Revízia 1.1.1.1, Sun Feb 16 15:48:06 2003 UTC (21 years, 1 month ago) by yenar
Zmeny od 1.1: +0 -0
[lines]
initial import of iotta into platon cvs
|
package Iotta::Elem;
use strict;
require Iotta;
our @ISA = ("Iotta");
sub run {
my $self = shift;
print STDERR " WARNING: generic element...\n";
}
sub setup {
}
sub finish {
}
sub initialize {
my $self = shift;
$self->SUPER::initialize (@_);
$self->{next}=0;
$self->{data}=0;
$self->{chain}=0;
}
1;
Platon Group <platon@platon.sk> http://platon.sk/
|