| … | … | ||
|---|---|---|---|
| 57 | 57 | ||
| 58 | sub wait { | 58 | sub wait { |
| 59 | $maincontext->iteration (1) while !${$_[0]}; | 59 | $maincontext->iteration (1) while !${$_[0]}; |
| 60 | } | 60 | } |
| 61 | 61 | ||
| 62 | sub one_event { | ||
| 63 | $maincontext->iteration (1); | ||
| 64 | } | ||
| 65 | |||
| 62 | 1 | 66 | 1 |
| 63 | 67 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |