From 2a80cbdc3708d9234af6e610d3499c316b301053 Mon Sep 17 00:00:00 2001 From: "Steinar H. Gunderson" Date: Mon, 28 Oct 2019 21:20:04 +0100 Subject: [PATCH] Fix some deep recursion. --- remoteglot.pl | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/remoteglot.pl b/remoteglot.pl index d8a7925..9d611c0 100755 --- a/remoteglot.pl +++ b/remoteglot.pl @@ -535,10 +535,14 @@ sub prettyprint_pv_no_cache { return (); } - my $pv = shift @pvs; - my ($from_row, $from_col, $to_row, $to_col, $promo) = parse_uci_move($pv); - my ($pretty, $nb) = $board->prettyprint_move($from_row, $from_col, $to_row, $to_col, $promo); - return ( $pretty, prettyprint_pv_no_cache($nb, @pvs) ); + my @ret = (); + for my $pv (@pvs) { + my ($from_row, $from_col, $to_row, $to_col, $promo) = parse_uci_move($pv); + my ($pretty, $nb) = $board->prettyprint_move($from_row, $from_col, $to_row, $to_col, $promo); + push @ret, $pretty; + $board = $nb; + } + return @ret; } sub prettyprint_pv { -- 2.39.2