Ticket #17663: basic.pic
| File basic.pic, 338 bytes (added by harry.weppner@…, 15 years ago) |
|---|
| Line | |
|---|---|
| 1 | # Define the objects |
| 2 | object(O,"o:Toolkit"); |
| 3 | placeholder_object(P); |
| 4 | step(); |
| 5 | |
| 6 | # Activation and messages |
| 7 | active(O); |
| 8 | message(O,O,"callbackLoop()"); |
| 9 | create_message(O,P,"p:Peer"); |
| 10 | message(O,P,"handleExpose()"); |
| 11 | active(P); |
| 12 | return_message(P,O,""); |
| 13 | inactive(P); |
| 14 | destroy_message(O,P); |
| 15 | inactive(O); |
| 16 | |
| 17 | # Complete the lifeline of O |
| 18 | step(); |
| 19 | complete(O); |