equal
deleted
inserted
replaced
317 eventQueue add: aGDBEvent. |
317 eventQueue add: aGDBEvent. |
318 eventQueueNotifier signalForAll. |
318 eventQueueNotifier signalForAll. |
319 ]. |
319 ]. |
320 |
320 |
321 "Created: / 02-06-2014 / 22:49:49 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
321 "Created: / 02-06-2014 / 22:49:49 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
322 "Modified: / 04-02-2018 / 10:28:38 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
322 ! |
323 ! |
323 |
324 |
324 pushEventSet: aGDBEventSet |
325 pushEventSet: aGDBEventSet |
325 eventQueueLock critical:[ |
326 eventQueueLock critical:[ |
326 eventQueue add: (GDBEventSetProcessingStarted new setEventSet: aGDBEventSet). |
327 eventQueue add: (GDBEventSetProcessingStarted new setEventSet: aGDBEventSet). |
328 eventQueue add: (GDBEventSetProcessingFinished new setEventSet: aGDBEventSet). |
329 eventQueue add: (GDBEventSetProcessingFinished new setEventSet: aGDBEventSet). |
329 eventQueueNotifier signalForAll. |
330 eventQueueNotifier signalForAll. |
330 ]. |
331 ]. |
331 |
332 |
332 "Created: / 02-06-2014 / 22:42:54 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
333 "Created: / 02-06-2014 / 22:42:54 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
333 "Modified: / 18-09-2014 / 22:50:23 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
334 "Modified: / 04-02-2018 / 10:28:34 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
334 ! ! |
335 ! ! |
335 |
336 |
336 !GDBConnection methodsFor:'initialize & release'! |
337 !GDBConnection methodsFor:'initialize & release'! |
337 |
338 |
338 initializeWithProcess: aGDBProcess |
339 initializeWithProcess: aGDBProcess |
367 "Modified: / 05-07-2014 / 22:20:05 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
368 "Modified: / 05-07-2014 / 22:20:05 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
368 "Modified: / 12-01-2018 / 15:09:00 / jv" |
369 "Modified: / 12-01-2018 / 15:09:00 / jv" |
369 ! |
370 ! |
370 |
371 |
371 released: status |
372 released: status |
372 self pushEvent: GDBExitEvent new. |
373 self pushEvent: (GDBExitEvent new setStatus: status; yourself). |
|
374 status success ifFalse:[ |
|
375 Logger log: ('gdb process: exited with status %1 code %2' bindWith: status status with: status code) severity: #error facility: 'GDB'. |
|
376 ]. |
373 TraceProcesses ifTrue:[ |
377 TraceProcesses ifTrue:[ |
374 Logger log: ('gdb process: exited with status %1' bindWith: status code) severity: #trace facility: 'GDB'. |
378 Logger log: ('gdb process: exited') severity: #trace facility: 'GDB'. |
375 Logger log: 'gdb process: waiting for event pump to finish' severity: #trace facility: 'GDB'. |
379 Logger log: 'gdb process: waiting for event pump to finish' severity: #trace facility: 'GDB'. |
376 ]. |
380 ]. |
377 self eventPumpStop. |
381 self eventPumpStop. |
378 eventQueueNotifier signalForAll. |
382 eventQueueNotifier signalForAll. |
379 process release. |
383 process release. |
380 inferiorPTY release. |
384 inferiorPTY release. |
381 |
385 |
382 "Created: / 26-05-2014 / 21:31:00 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
386 "Created: / 26-05-2014 / 21:31:00 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
383 "Modified: / 01-06-2017 / 22:24:42 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
387 "Modified: / 04-02-2018 / 20:29:47 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
384 ! ! |
388 ! ! |
385 |
389 |
386 !GDBConnection class methodsFor:'documentation'! |
390 !GDBConnection class methodsFor:'documentation'! |
387 |
391 |
388 version_HG |
392 version_HG |