… | |
… | |
259 | X_LOCK (release_m); |
259 | X_LOCK (release_m); |
260 | while (idle < min_idle) |
260 | while (idle < min_idle) |
261 | start_thread (); |
261 | start_thread (); |
262 | X_UNLOCK (release_m); |
262 | X_UNLOCK (release_m); |
263 | |
263 | |
264 | /* not perfectly efficient to do it this way, but it's simple */ |
264 | /* not perfectly efficient to do it this way, but it is simple */ |
|
|
265 | perl_multicore_init (); /* calls release */ |
265 | perl_multicore_init (); |
266 | perl_multicore_acquire (); |
266 | perl_multicore_api->pmapi_release = pmapi_release; |
267 | perl_multicore_api->pmapi_release = pmapi_release; |
267 | perl_multicore_api->pmapi_acquire = pmapi_acquire; |
268 | perl_multicore_api->pmapi_acquire = pmapi_acquire; |
268 | } |
269 | } |
269 | |
270 | |
270 | bool |
271 | bool |