RE: Game of Life

Gidon writes:
> That's fun, thanks.
> 
> Substitute the 'run' function with this
> if you want it to work one generation at a time.
> 
> sub run {
>     my ($array, $rules, $rows, $cols, $size, $c) = @_;
> 
>    &step( $array, $rules, $rows, $cols, $size, $c);
> }

Actually, that's what I had at the beginning :)

> 
> P.S. Without the above modification I got this error.
> 
> Deep recursion on subroutine "Tk::After::repeat" at lif
> e.pl line 150.
> Deep recursion on subroutine "main::step" at /usr/lib/p
> erl5/site_perl/5.005/i386-linux/Tk/After.pm line 73.

Strange. I don't get this. I have a feeling it's your Perl and/or Tk
version. Try upgrading and see.

--Ala