Feat: crash bugfixes

2026-03-03 13:10:22 +01:00
parent cf1d2be140
commit 16d6d76422
6 changed files with 27 additions and 14 deletions
--- a/crates/forth/src/vm.rs
+++ b/crates/forth/src/vm.rs
@@ -1180,11 +1180,11 @@ impl Forth {
                }

                Op::Loop => {
-                    let beats = pop_float(stack)?;
+                    let steps = pop_float(stack)?;
                    if ctx.tempo == 0.0 || ctx.speed == 0.0 {
                        return Err("tempo and speed must be non-zero".into());
                    }
-                    let dur = beats * 60.0 / ctx.tempo / ctx.speed;
+                    let dur = steps * ctx.step_duration();
                    cmd.set_param("fit", Value::Float(dur, None));
                    cmd.set_param("dur", Value::Float(dur, None));
                }