From b32bb0287620e616ea09bdd88bd1358feaefcd2e Mon Sep 17 00:00:00 2001
From: Koichi Nakamura <koichi@idein.jp>
Date: Sat, 2 Jan 2021 10:25:16 +0900
Subject: [PATCH] add "state"

---
 core.fs | 1 +
 1 file changed, 1 insertion(+)

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 @ ;