Lines Matching refs:counter
14 ### The counter class is an agent implementing the business logic
25 ### Create two counter instances c1/c2
36 -instmixin PageTemplateHtml -parameter {counter}
40 [my set place] exportObjs [self] ;### export the web counter object
41 my exportProcs increment ;### export counter's increment method
44 my instvar counter ;### import var that stores shielded web agent
45 $counter [self proc] ;### call the actual method on the web agent
49 my instvar count counter ;### importiere var that stores shielded web agent
50 $counter instvar count ;### importiere count var
52 # and create web-page with counter content
54 my simplePage [self] "Html-Facade for $counter using a page template" \
55 "The value in $counter is $count.<p>
59 # create two web-facade instances; one for each counter
61 WebCounter web-c1 -counter c1
62 WebCounter web-c2 -counter c2