From 9a8257c238273f91903e477f73a5b2e55255f8a1 Mon Sep 17 00:00:00 2001
From: Koichi Nakamura <koichi@idein.jp>
Date: Sat, 2 Jan 2021 09:08:59 +0900
Subject: [PATCH] Add Variable and Constant

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

diff --git a/core.fs b/core.fs
index 73699fe..143c07e 100644
--- a/core.fs
+++ b/core.fs
@@ -819,6 +819,12 @@ alias-builtin xor       ^
     swap !      \ backfill xt to the operand of literal
 ; immediate
 
+( === Variable and Constant === )
+
+\ ( "name" -- )
+: variable create 0 , ;
+
+\ ( n "name" -- )
 : constant create , does> @ ;
 
 bye