From 93924dca6eca2d108e3bd07317aad0563db4d0bd Mon Sep 17 00:00:00 2001 From: Pavel Panchekha Date: Mon, 3 Jun 2024 14:43:40 -0600 Subject: [PATCH] Woops! --- eval/adjust.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/eval/adjust.rkt b/eval/adjust.rkt index ebc388a..0a2ad8d 100644 --- a/eval/adjust.rkt +++ b/eval/adjust.rkt @@ -57,7 +57,7 @@ ; Step 5. If precisions have not changed but the point didn't converge. A problem exists - add slack to every op (unless any-false? - (set-rival-machine-bumps! (add1 bumps)) + (set-rival-machine-bumps! machine (add1 bumps)) (define slack (get-slack)) (for ([prec (in-vector vprecs)] [n (in-range (vector-length vprecs))])