ProxyMethod.st
branchcvs_MAIN
changeset 3904 63498892f4e0
parent 3903 e0870fe108eb
child 3905 47a9771ec8fa
equal deleted inserted replaced
3903:e0870fe108eb 3904:63498892f4e0
   228 !
   228 !
   229 
   229 
   230 source
   230 source
   231 
   231 
   232     ^String streamContents:[:s|
   232     ^String streamContents:[:s|
   233         s nextPut: $"; cr.
   233         s nextPutAll: c'"\nThis is a generated proxy method\n'.
   234         s nextPutAll: 'This is a generated proxy method'; cr.
   234         self decompileTo:s. 
   235         self decompileTo: s. s cr.
   235         s nextPutAll: c'\n"\n'.
   236         s nextPut: $"; cr.
       
   237     ]
   236     ]
   238 
   237 
   239     "Created: / 23-12-2011 / 13:51:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   238     "Created: / 23-12-2011 / 13:51:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
   239     "Modified: / 07-06-2019 / 22:53:28 / Claus Gittinger"
   240 ! !
   240 ! !
   241 
   241 
   242 !ProxyMethod methodsFor:'building'!
   242 !ProxyMethod methodsFor:'building'!
   243 
   243 
   244 addGuard: aGuard
   244 addGuard: aGuard