Solve a Hidato puzzle: Difference between revisions

Content added Content deleted
m (→‎{{header|Perl 6}}: Add links to similar tasks)
(→‎{{header|Perl 6}}: Syntax fix, "0" is true now. (didn't actually affect this particular problem))
Line 2,437: Line 2,437:
my $old = @grid[$y][$x];
my $old = @grid[$y][$x];


return False if $old and $old != $v;
return False if +$old and $old != $v;
return False if @known[$v] and @known[$v] !eqv $coord;
return False if @known[$v] and @known[$v] !eqv $coord;