From: Clyne Sullivan <clyne@bitgloo.com>
Date: Fri, 10 Feb 2023 01:30:24 +0000 (-0500)
Subject: add 2/ and 2*
X-Git-Url: https://code.bitgloo.com/?a=commitdiff_plain;h=27742595b575c59b1f482e5a72195fdfbf16c5d6;p=bitgloo%2Falee-forth.git

add 2/ and 2*
---

diff --git a/core.fth b/core.fth
index 555b126..06aad0a 100644
--- a/core.fth
+++ b/core.fth
@@ -30,6 +30,8 @@
 : xor    ^ ;
 : lshift << ;
 : rshift >> ;
+: 2*     2 * ;
+: 2/     2 / ;
 
 : ,      here ! 1 allot ;
 : c!     ! ;