… | |
… | |
122 | delete $pid_cb{$pid}; |
122 | delete $pid_cb{$pid}; |
123 | remove Glib::Source delete $pid_w{$pid}; |
123 | remove Glib::Source delete $pid_w{$pid}; |
124 | } |
124 | } |
125 | } |
125 | } |
126 | |
126 | |
127 | sub AnyEvent::CondVar::_wait { |
|
|
128 | $mainloop->iteration (1) until $_[0]{_ae_sent}; |
|
|
129 | } |
|
|
130 | |
|
|
131 | #sub loop { |
127 | #sub loop { |
132 | # # hackish, but we do not have a mainloop, just a maincontext |
128 | # # hackish, but we do not have a mainloop, just a maincontext |
133 | # $mainloop->iteration (1) while 1; |
129 | # $mainloop->iteration (1) while 1; |
134 | #} |
130 | #} |
|
|
131 | |
|
|
132 | sub _poll { |
|
|
133 | $mainloop->iteration (1); |
|
|
134 | } |
|
|
135 | |
|
|
136 | sub AnyEvent::CondVar::Base::_wait { |
|
|
137 | $mainloop->iteration (1) until $_[0]{_ae_sent}; |
|
|
138 | } |
135 | |
139 | |
136 | 1; |
140 | 1; |
137 | |
141 | |
138 | =head1 SEE ALSO |
142 | =head1 SEE ALSO |
139 | |
143 | |