From d7aa9cfb96b024a0eb0b7305424c39c6c28d1c33 Mon Sep 17 00:00:00 2001 From: Thomas White Date: Fri, 6 May 2022 16:29:10 +0200 Subject: Formatting --- guile/starlet/scanout.scm | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/guile/starlet/scanout.scm b/guile/starlet/scanout.scm index 4b7a2e1..f5f4baa 100644 --- a/guile/starlet/scanout.scm +++ b/guile/starlet/scanout.scm @@ -282,12 +282,12 @@ ;; Update scanout rate every 1000 cycles (if (eq? count 100) - (begin - (set! scanout-freq - (exact->inexact (/ 100 - (- (hirestime) start-time)))) - (scanout-loop ola-client (hirestime) 0 universes)) - (scanout-loop ola-client start-time (+ count 1) universes)))) + (begin + (set! scanout-freq + (exact->inexact (/ 100 + (- (hirestime) start-time)))) + (scanout-loop ola-client (hirestime) 0 universes)) + (scanout-loop ola-client start-time (+ count 1) universes)))) (define (start-ola-output) -- cgit v1.2.3