From 05553188e84a67d726a20d6eb1ff99e79efef5ac Mon Sep 17 00:00:00 2001 From: ManDude <7569514+ManDude@users.noreply.github.com> Date: Sun, 19 Jun 2022 15:36:31 +0100 Subject: [PATCH] fix test --- goal_src/levels/rolling/rolling-obs.gc | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/goal_src/levels/rolling/rolling-obs.gc b/goal_src/levels/rolling/rolling-obs.gc index ea3bb6e37e..d06e69a281 100644 --- a/goal_src/levels/rolling/rolling-obs.gc +++ b/goal_src/levels/rolling/rolling-obs.gc @@ -706,16 +706,14 @@ (set! (-> arg0 digit 2) (the int f0-3)) (let ((f0-4 (- f0-3 (the float (-> arg0 digit 2))))) (set! (-> arg0 digit 3) (the int (* 10.0 f0-4))) - (let* ((f0-5 (- f0-4 (* 0.1 (the float (-> arg0 digit 3))))) - (v0-0 (the int (* 100.0 f0-5))) - ) - (set! (-> arg0 digit 4) v0-0) - v0-0 + (let ((f0-5 (- f0-4 (* 0.1 (the float (-> arg0 digit 3)))))) + (set! (-> arg0 digit 4) (the int (* 100.0 f0-5))) ) ) ) ) ) + (none) ) (defun race-time->seconds ((arg0 race-time))