GDB.st
changeset 11 474fbb650afe
parent 10 f04a22c9b16c
child 12 568a2971c977
equal deleted inserted replaced
10:f04a22c9b16c 11:474fbb650afe
    23 
    23 
    24     "Created: / 02-06-2014 / 23:06:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    24     "Created: / 02-06-2014 / 23:06:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    25 !
    25 !
    26 
    26 
    27 inferiorStderr
    27 inferiorStderr
    28     ^ driver inferiorOutput
    28     ^ driver inferiorPTY master
    29 
    29 
    30     "Created: / 09-06-2014 / 10:01:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    30     "Created: / 09-06-2014 / 10:01:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
    31     "Modified: / 09-06-2014 / 18:26:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    31 !
    32 !
    32 
    33 
    33 inferiorStdin
    34 inferiorStdin
    34     ^ driver inferiorInput
    35     ^ driver inferiorPTY master
    35 
    36 
    36     "Created: / 09-06-2014 / 10:00:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    37     "Created: / 09-06-2014 / 10:00:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
    38     "Modified: / 09-06-2014 / 18:27:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    37 !
    39 !
    38 
    40 
    39 inferiorStdout
    41 inferiorStdout
    40     ^ driver inferiorOutput
    42     ^ driver inferiorPTY master
    41 
    43 
    42     "Created: / 09-06-2014 / 10:01:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    44     "Created: / 09-06-2014 / 10:01:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
    45     "Modified: / 09-06-2014 / 18:27:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    43 ! !
    46 ! !
    44 
    47 
    45 !GDB methodsFor:'accessing-private'!
    48 !GDB methodsFor:'accessing-private'!
    46 
    49 
    47 nextCommandSequnceNumber
    50 nextCommandSequnceNumber
   138         when: GDBExitEvent              send: #onExit: to: self.
   141         when: GDBExitEvent              send: #onExit: to: self.
   139 
   142 
   140     driver eventPumpStart.
   143     driver eventPumpStart.
   141     driver eventDispatchStart.
   144     driver eventDispatchStart.
   142 
   145 
       
   146     self send: (GDBMICommand inferiorTtySet: driver inferiorPTY name).
       
   147 
   143     "Created: / 26-05-2014 / 21:23:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   148     "Created: / 26-05-2014 / 21:23:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   144     "Modified: / 03-06-2014 / 00:35:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   149     "Modified: / 09-06-2014 / 21:18:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   145 !
   150 !
   146 
   151 
   147 release
   152 release
   148     driver notNil ifTrue:[ 
   153     driver notNil ifTrue:[ 
   149         driver release.
   154         driver release.