fix decimal and hex

2 years ago · 914a75b209
parent dac0553eb5
commit 914a75b209
1 changed files with 2 additions and 2 deletions
--- 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