mirror of
git://git.sv.gnu.org/coreutils.git
synced 2026-04-18 09:46:33 +02:00
move decl of q into loop
This commit is contained in:
@@ -26,10 +26,9 @@ sub is_prime ($)
|
||||
|
||||
my $d = 2;
|
||||
my $w = 1;
|
||||
my $q;
|
||||
while (1)
|
||||
{
|
||||
$q = $n / $d;
|
||||
my $q = $n / $d;
|
||||
($n == $q * $d)
|
||||
and return 0;
|
||||
$d += $w;
|
||||
|
||||
Reference in New Issue
Block a user