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,951 messages   

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

   Message 117,029 of 117,951   
   albert@spenarnc.xs4all.nl to dxforth@gmail.com   
   Re: Back & Forth - Co-routines   
   31 Jan 25 11:47:34   
   
   In article <49736c0ec0e34ca5d67f4e0d6e8cbe2a080e38ab@i2pn2.org>,   
   dxf   wrote:   
   >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 ?   
      
   I hate TUCK but this code could benefit from RTUCK   
      
   : RTUCK R> >R >R ;   
   Obviously this must be low level.   
      
   Groetjes Albert   
   >   
   >   
   >   
   --   
   Temu exploits Christians: (Disclaimer, only 10 apostles)   
   Last Supper Acrylic Suncatcher - 15Cm Round Stained Glass- Style Wall   
   Art For Home, Office And Garden Decor - Perfect For Windows, Bars,   
   And Gifts For Friends Family And Colleagues.   
      
   --- 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