… | |
… | |
2284 | $LAST_REFRESH = $NOW; |
2284 | $LAST_REFRESH = $NOW; |
2285 | } |
2285 | } |
2286 | |
2286 | |
2287 | $WANT_REFRESH = EV::idle_ns \&force_refresh; |
2287 | $WANT_REFRESH = EV::idle_ns \&force_refresh; |
2288 | |
2288 | |
2289 | my $input = EV::timer 0, 1/60, sub { |
2289 | # 0.015 is server tick time / 8 ~~ 66.6...hz |
|
|
2290 | my $input = EV::periodic 0, 0.015, undef, sub { |
2290 | $NOW = time; |
2291 | $NOW = time; |
2291 | |
2292 | |
2292 | ($SDL_CB{$_->{type}} || sub { warn "unhandled event $_->{type}" })->($_) |
2293 | ($SDL_CB{$_->{type}} || sub { warn "unhandled event $_->{type}" })->($_) |
2293 | for CFPlus::poll_events; |
2294 | for CFPlus::poll_events; |
2294 | |
2295 | |