diff --git a/frustration.rs b/frustration.rs
index 66385b4..a29a064 100644
--- a/frustration.rs
+++ b/frustration.rs
@@ -2320,7 +2320,7 @@ fn build_dictionary(c: &mut Core) {
 //@ with the contents of the input buffer.
 
     // dispatch ( xt -- )
-    d.entry(); d.name(9, *b"int");  let dispatch = d.here;
+    d.entry(); d.name(8, *b"dis");  let dispatch = d.here;
     forth!(
         /* If the word was found in the dictionary, treat it as a word. */
         DUP, Q, do_word,