diff --git a/core.fs b/core.fs
index 9ea3f60..a74d7d9 100644
--- a/core.fs
+++ b/core.fs
@@ -455,6 +455,7 @@ alias-builtin xor       ^
 : >cfa      G ;
 : c,        B ;
 : cmove,    m ;
+: state     M ;
 
 : here      &here @ ;
 : latest    &latest @ ;