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,004 of 117,927   
   Hans Bezemer to albert@spenarnc.xs4all.nl   
   Re: "Back & Forth" - Local variables   
   08 Jan 25 19:11:53   
   
   From: the.beez.speaks@gmail.com   
      
   On 08-01-2025 17:27, albert@spenarnc.xs4all.nl wrote:   
      
   ( my CO variant, using the return address)   
      
   : LOCAL R> SWAP DUP >R @ >R EXECUTE R> R> ! ;   
      
   VARIABLE A   
   VARIABLE B   
      
   \ I'm paranoid :)   
      
   8 a !   
   7 b !   
      
   : divide   
        A LOCAL   
        B LOCAL   
        B ! A !  A @ B @ /   
        . CR   
      
      
   15 3 divide a ? b ?   
   \ it doesn't mean they're not out to get you   
      
   Wow! This works! Can't say how solid it is.. but still!   
      
   Hans Bezemer   
      
   --- SoupGate-DOS v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)   

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


(c) 1994,  bbs@darkrealms.ca