Work on documentation

crates/forth/src/words.rs

@@ -438,16 +438,6 @@ pub const WORDS: &[Word] = &[
         compile: Simple,
         varargs: false,
     },
-    Word {
-        name: ".!",
-        aliases: &[],
-        category: "Sound",
-        stack: "(n --)",
-        desc: "Emit current sound n times",
-        example: "\"kick\" s 4 .!",
-        compile: Simple,
-        varargs: true,
-    },
     // Variables (prefix syntax: @name to fetch, !name to store)
     Word {
         name: "@<var>",
@@ -2280,6 +2270,16 @@ pub const WORDS: &[Word] = &[
         compile: Simple,
         varargs: false,
     },
+    Word {
+        name: "times",
+        aliases: &[],
+        category: "Control",
+        stack: "(n quot --)",
+        desc: "Execute quotation n times, @i holds current index",
+        example: "4 { @i . } times => 0 1 2 3",
+        compile: Simple,
+        varargs: false,
+    },
 ];
 
 pub(super) fn simple_op(name: &str) -> Option<Op> {
@@ -2352,11 +2352,11 @@ pub(super) fn simple_op(name: &str) -> Option<Op> {
         "chain" => Op::Chain,
         "loop" => Op::Loop,
         "oct" => Op::Oct,
-        ".!" => Op::EmitN,
         "clear" => Op::ClearCmd,
         ".." => Op::IntRange,
         "gen" => Op::Generate,
         "geom.." => Op::GeomRange,
+        "times" => Op::Times,
         _ => return None,
     })
 }