In article <87cyl6396z.fsf@nightsong.com>,   
   Paul Rubin   wrote:   
   >dxf  writes:   
   >> You have the source to my app.  Perhaps you can nominate where locals   
   >> could have been used to better effect.   
   >   
   >  : EMITS ( n char -- )  swap 0 ?do dup emit loop drop ;   
   >   
   >could be written:   
   >   
   >  : EMITS {: n char -- :} n 0 ?do char emit loop ;   
      
   I think TYPE should be the primitive and EMIT should   
   be handle a 1 char string.   
      
   : EMIT DSP@ 1 TYPE DROP ;   
      
   Imagine that you have concurrent tasks and one will write   
   in red, the other in blue. You could lock up the terminal   
   with undefined escape sequence.   
      
   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-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)