From 914a75b2097090595d12015b750f97dc55bf7dcd Mon Sep 17 00:00:00 2001
From: Clyne Sullivan <clyne@bitgloo.com>
Date: Fri, 24 Feb 2023 08:50:46 -0500
Subject: [PATCH] fix decimal and hex

---
 core.fth | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/core.fth b/core.fth
index 4f7ef81..85744a7 100644
--- a/core.fth
+++ b/core.fth
@@ -36,8 +36,8 @@
 : postpone 1 3 cells ! ; imm
 : _input   4 cells ;
 
-: decimal  1 1+ base ! 1010 base ! ;
-: hex      1 1+ base ! 10000 base ! ;
+: decimal  10 base ! ;
+: hex      16 base ! ;
 
 : [']      ' postpone literal ; imm
 : [        0 state ! ; imm