home bbs files messages ]

Forums before death by AOL, social media and spammers... "We can't have nice things"

   comp.lang.forth      Forth programmers eat a lot of Bratwurst      117,927 messages   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]

   Message 117,647 of 117,927   
   Hans Bezemer to dxf   
   Re: Conditional compilation   
   26 Oct 25 15:29:21   
   
   From: the.beez.speaks@gmail.com   
      
   On 4tH, it doesn't even compile:   
      
   $ pp4th -x pptest10.4th   
   Compiling;	Word 29: Incomplete declaration   
      
   After adding the [THEN]:   
      
   $ pp4th -x pptest10.4th   
   1 (TOS)   
      
   Decompile:   
      
   4tH message: Incomplete declaration at word 29   
   Object size: 29 words   
   String size: 7 chars   
   Variables  : 0 cells   
   Strings    : 0 chars   
   Symbols    : 1 names   
   Reliable   : No   
      
      Addr| Opcode                        Operand   Argument   
      
        20| rot                                 0   
        21| +literal                           -1   
        22| branch                             13   
        23| drop                                0   
        24| ."                                  0   (TOS)   
        25| drop                                0   
        26| cr                                  0   
        27| exit                                0 <<<< end of .S definition   
        28| literal                             1   
      
   Message: Incomplete declaration (#23 M4NODECL)   
   Words: All defining words and compiler directives   
   Example: 10 CONSTANT CONSTANT NAME   
   Cause: 4. An [IF] is not balanced by a [THEN].   
      
   I forgot all about this thingy!   
      
   Hans Bezemer   
      
   On 25-10-2025 13:36, dxf wrote:   
    > 1   
    >   
    > 0 [IF]   
    >   
    > 2   
    >   
    > 0 [IF]   
    >   
    > 3   
    >   
    > [THEN]   
    >   
    > .S   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]


(c) 1994,  bbs@darkrealms.ca