variable

1 files changed, 1 insertions, 0 deletions

diff --git a/jefs.fs b/jefs.fs
index dc56042..e9c3119 100644
--- a/jefs.fs
+++ b/jefs.fs
@@ -17,6 +17,7 @@ decimal
 : [compile] parse find drop >cfa compile, ; immediate
 : ' parse find drop >cfa [compile] lit ; immediate \ note: no error handling (yet)
 : constant create [compile] lit ret, ;
+: variable 1 cells allot create [compile] lit ret, ;
 
 : begin here @ ; immediate
 : again branch here @ 4 + - d, ; immediate \ add 4 to get to beginning of the next instruction