From: the.beez.speaks@gmail.com   
      
   On 20-04-2025 12:37, dxf wrote:   
   > On 20/04/2025 6:18 pm, Paul Rubin wrote:   
   >> anton@mips.complang.tuwien.ac.at (Anton Ertl) writes:   
   >>> : DECIMAL ( -- )   10 BASE ! ;   
   >>> does not contain an invocation of DECIMAL before this use of "10".   
   >>   
   >> : DECIMAL ( -- ) 5 5 + BASE ! ;   
   >>   
   >> should usually work.   
   >   
   > Perhaps it's been updated since as the SwiftForth file I have has:   
   >   
   > : DECIMAL ( -- )   $0A BASE ! ;   
   >   
   > Closest thing to a BASE issue I've encountered was invoking the   
   > screen editor while in HEX.  After doing that a few times I fixed   
   > the editor!   
   >   
   > Really annoying was LMI which on error switched to DECIMAL ...   
   >   
      
   I once had a newbie who thought that "BASE ?" was a useful test. But   
   apart from that, you could easily make it a primitive, I suppose.   
   In 4tH it's hard coded as:   
      
   { 7, "DECIMAL", RADIX, 10L },   
      
   Where "RADIX" sets base:   
      
   CODE (RADIX)    *Base = OPERAND; NEXT;   
      
   So I have no such problem.   
      
   Hans Bezemer   
      
   --- SoupGate-DOS v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)