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,028 of 117,927   
   dxf to Hans Bezemer   
   Re: Back & Forth - Co-routines   
   31 Jan 25 18:33:17   
   
   From: dxforth@gmail.com   
      
   On 31/01/2025 4:42 am, Hans Bezemer wrote:   
   > The lot of you have contributed to this episode - by discussing the previous   
   episode on local variables.   
   >   
   > I thank you for your comments - and decided it was worth its own episode:   
   https://youtu.be/FH4tWf9vPrA   
   >   
   > More than worth! ;-)   
      
   Thanks Hans!   
      
   Not sure if previously mentioned but here's another version of LOCAL   
      
   : ;:  >r ;   
      
   : LOCAL ( x adr -- )   
     r> -rot dup @ over 2>r ! ;: 2r> ! ;   
      
   variable A  variable B  8 a !  7 b !   
      
   : divide ( a b -- )  b local  a local   
     a @  b @  /  . cr  ;   
      
   15 3 divide  a ? b ?   
      
   --- 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