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,683 of 117,927   
   Gerry Jackson to Gerry Jackson   
   Re: Iterator not using [ELSE]!   
   04 Nov 25 23:15:37   
   
   From: do-not-use@swldwa.uk   
      
   On 04/11/2025 21:36, Gerry Jackson wrote:   
   > : iterator:  ( "name" -- xt ) \ xt of quotation   
   >     : ]] true begin [: [[   
   >     save-input ]] scan-words [[ restore-input   
   >     abort" Error: RESTORE-INPUT failed"   
   > ;   
      
     I just realised to my embarassment that this is unduly complicated. Of   
   course the scanning is not required. All that is needed for iterator: is   
   simply:   
      
   : iterator:  ( "name" -- )   
       : ]] true begin [: [[   
      
      
   So scan-words and the first definition of ;iterator are not needed.   
      
      
      
   --   
   Gerry   
      
   --- 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