Browse Source

Partial pseudo-revert

gingerBill 1 year ago
parent
commit
d27109640e
1 changed files with 8 additions and 4 deletions
  1. 8 4
      core/math/big/prime.odin

+ 8 - 4
core/math/big/prime.odin

@@ -1250,7 +1250,10 @@ internal_random_prime :: proc(a: ^Int, size_in_bits: int, trials: int, flags :=
 		/*
 		/*
 			Is it prime?
 			Is it prime?
 		*/
 		*/
-		internal_int_is_prime(a, trials) or_return or_continue
+		res := internal_int_is_prime(a, trials) or_return
+		if !res {
+			continue
+		}
 
 
 		if .Safe in flags {
 		if .Safe in flags {
 			/*
 			/*
@@ -1262,9 +1265,10 @@ internal_random_prime :: proc(a: ^Int, size_in_bits: int, trials: int, flags :=
 			/*
 			/*
 				Is it prime?
 				Is it prime?
 			*/
 			*/
-			if internal_int_is_prime(a, trials) or_return {
-				break
-			}
+			res = internal_int_is_prime(a, trials) or_return
+		}
+		if res {
+			break
 		}
 		}
 	}
 	}