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,136 of 117,927    |
|    dxf to Hans Bezemer    |
|    Re: Back & Forth - Co-routines    |
|    22 Mar 25 10:26:45    |
   
   From: dxforth@gmail.com   
      
   On 21/03/2025 11:27 pm, Hans Bezemer wrote:   
   > ...   
   > Nice test - I bet it wouldn't be too hard to implement at least part of the   
   Forth-200x implementation ;-)   
   >   
   > Sometin' like define {:   
   > 1. Parse a word;   
   > 2. If not :} then create a (local);   
   > 3. Repeat.   
   >   
   > Ok, this is horrible code, it needs the VALUES in reverse, but it works:   
   >   
   > : :} ;   
   > : {: begin ' dup ['] :} <> while >body postpone literal postpone (local)   
   repeat drop ; immediate   
   >   
   > : test {: b a :} a b / ;   
      
   I'd just call that LOCAL| and be done. Can't say I ever found the syntax an   
   annoyance. I appreciate it might not be ideal for doing Windows API calls...   
      
   --- 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