diff options
author | Clyne Sullivan <clyne@bitgloo.com> | 2023-02-09 14:01:05 -0500 |
---|---|---|
committer | Clyne Sullivan <clyne@bitgloo.com> | 2023-02-09 14:01:05 -0500 |
commit | 59ecb61463119e77637214e3c298c422c4537ea0 (patch) | |
tree | a77f15d7897c9f1f23db3d54e859cba3a7a56822 /core.fth | |
parent | 4367821606962df980f5aa0823575856796b16fc (diff) |
parse files
Diffstat (limited to 'core.fth')
-rw-r--r-- | core.fth | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/core.fth b/core.fth new file mode 100644 index 0000000..ab53923 --- /dev/null +++ b/core.fth @@ -0,0 +1,15 @@ +( : variable create 0 , ; ) +( : create here const ; ) + +: . 0 sys ; + +: over 1 pick ; +: -rot rot rot ; +: nip swap drop ; +: tuck swap over ; + +: 1+ 1 + ; +: 1- 1 - ; + +: 0= 0 = ; +: >= < 0= ; |