TerminalView.st
changeset 5659 7a69d3fdca24
parent 5638 df7b96c04c11
child 5702 5829d2def42c
equal deleted inserted replaced
5658:22ffe8e819d6 5659:7a69d3fdca24
       
     1 "{ Encoding: utf8 }"
       
     2 
     1 "
     3 "
     2  COPYRIGHT (c) 1998 by eXept Software AG
     4  COPYRIGHT (c) 1998 by eXept Software AG
     3               All Rights Reserved
     5               All Rights Reserved
     4 
     6 
     5  This software is furnished under a license and may be used
     7  This software is furnished under a license and may be used
  2162         OperatingSystem isUNIXlike ifTrue:[
  2164         OperatingSystem isUNIXlike ifTrue:[
  2163             OperatingSystem interruptProcessGroup:shellPid.
  2165             OperatingSystem interruptProcessGroup:shellPid.
  2164             OperatingSystem interruptProcess:shellPid.
  2166             OperatingSystem interruptProcess:shellPid.
  2165             "/ status := OperatingSystem childProcessWait:false pid:shellPid.
  2167             "/ status := OperatingSystem childProcessWait:false pid:shellPid.
  2166         ] ifFalse:[
  2168         ] ifFalse:[
  2167             self warn:(resources string:'unimplemented for DOS')
  2169             'TerminalView [info]: IRQ unimplemented for DOS' infoPrintCR.
  2168         ]
  2170         ]
  2169     ] ifFalse:[
  2171     ] ifFalse:[
  2170         'VT100: no shell' infoPrintCR.
  2172         'TerminalView [info]: no shell' infoPrintCR.
  2171     ].
  2173     ].
  2172 
  2174 
  2173     "Modified: / 10.6.1998 / 17:49:49 / cg"
  2175     "Modified: / 10.6.1998 / 17:49:49 / cg"
  2174 !
  2176 !
  2175 
  2177