From: krishna.myneni@ccreweb.org   
      
   On 10/4/25 5:04 PM, Krishna Myneni wrote:   
   ...   
   > For every class member of  which needs "this", define the member as   
   > follows,   
   >   
   > 0 ptr this   \ ptr is synonymous with VALUE in ANS Forth   
   > :noname ( o -- )   
   >     to this   
   >     ...   
   >     this V1 @   \ V1 is a var which belongs to the class for object o   
   >     ...   
   >  defines    
   > ...   
      
   An error in the above code is fixed below:   
      
   0 ptr this   \ ptr is synonymous with VALUE in ANS Forth   
   :noname ( o -- )   
       to this   
       ...   
       this V1 @   \ V1 is a var which belongs to the class for object o   
       ...   
      \ close the noname definition, leave xt on the stack   
    defines    
      
   --   
   KM   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)