Feat: refactoring by breaking words in multiple files

tests/forth/temporal.rs

@@ -91,7 +91,7 @@ fn alternating_sounds() {
 fn dur_is_step_duration() {
     let outputs = expect_outputs(r#""kick" s ."#, 1);
     let durs = get_durs(&outputs);
-    assert!(approx_eq(durs[0], 0.125), "dur should be step_duration (0.125), got {}", durs[0]);
+    assert!(approx_eq(durs[0], 0.5), "dur should be 4 * step_duration (0.5), got {}", durs[0]);
 }
 
 #[test]
@@ -181,6 +181,15 @@ fn at_reset_with_zero() {
     assert_eq!(sounds, vec!["kick", "kick", "hat"]);
 }
 
+#[test]
+fn clear_resets_at_deltas() {
+    let outputs = expect_outputs(r#"0 0.5 at "kick" s . clear "hat" s ."#, 3);
+    let sounds = get_sounds(&outputs);
+    assert_eq!(sounds, vec!["kick", "kick", "hat"]);
+    let deltas = get_deltas(&outputs);
+    assert!(approx_eq(deltas[2], 0.0), "after clear, hat should emit at delta 0, got {}", deltas[2]);
+}
+
 #[test]
 fn at_records_selected_spans() {
     use cagire::forth::ExecutionTrace;