From 8982892c90d74c2d09380dff0034c2802ab07b94 Mon Sep 17 00:00:00 2001
From: cancel <cancel@cancel.fm>
Date: Thu, 24 Jan 2019 08:24:22 +0900
Subject: [PATCH] Fix ordering of gbuffer reads in `C` operator

---
 sim.c | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/sim.c b/sim.c
index 01d458e..4bbd4bc 100644
--- a/sim.c
+++ b/sim.c
@@ -448,12 +448,12 @@ BEGIN_OPERATOR(clock)
   PORT(0, -1, IN | PARAM);
   PORT(0, 1, IN);
   PORT(1, 0, OUT);
-  Usz mod_num = index_of(PEEK(0, 1));
   Usz rate = index_of(PEEK(0, -1));
-  if (mod_num == 0)
-    mod_num = 10;
+  Usz mod_num = index_of(PEEK(0, 1));
   if (rate == 0)
     rate = 1;
+  if (mod_num == 0)
+    mod_num = 10;
   Glyph g = glyph_of(Tick_number / rate % mod_num);
   POKE(1, 0, g);
 END_OPERATOR