Exception.st
changeset 4447 b41133d7941b
parent 4445 7011a3da6c72
child 4449 c8e195e21aab
equal deleted inserted replaced
4446:4da4e51fc1ab 4447:b41133d7941b
   757           123 size open   
   757           123 size open   
   758        ]
   758        ]
   759       "
   759       "
   760 
   760 
   761     "Created: / 23.7.1999 / 14:06:40 / stefan"
   761     "Created: / 23.7.1999 / 14:06:40 / stefan"
       
   762 ! !
       
   763 
       
   764 !Exception class methodsFor:'compatibility - signal creation'!
       
   765 
       
   766 newSignal
       
   767     "create a new signal, using the receiver as a prototype and
       
   768      setting the parent of the new signal to the receiver."
       
   769 
       
   770     ^ self newSignalMayProceed:self mayProceed
       
   771 
       
   772     "Created: / 23.7.1999 / 20:13:23 / stefan"
       
   773 !
       
   774 
       
   775 newSignalMayProceed:proceed
       
   776     "create a new signal, using the receiver as a prototype and
       
   777      setting the parent of the new signal to the receiver."
       
   778 
       
   779     ^ (Signal basicNew) mayProceed:proceed;
       
   780                     notifierString:NotifierString;
       
   781                             parent:self
       
   782 
       
   783     "Created: / 23.7.1999 / 20:12:43 / stefan"
   762 ! !
   784 ! !
   763 
   785 
   764 !Exception class methodsFor:'defaults'!
   786 !Exception class methodsFor:'defaults'!
   765 
   787 
   766 emergencyHandler
   788 emergencyHandler
  1627 ! !
  1649 ! !
  1628 
  1650 
  1629 !Exception class methodsFor:'documentation'!
  1651 !Exception class methodsFor:'documentation'!
  1630 
  1652 
  1631 version
  1653 version
  1632     ^ '$Header: /cvs/stx/stx/libbasic/Exception.st,v 1.68 1999-07-23 15:46:21 stefan Exp $'
  1654     ^ '$Header: /cvs/stx/stx/libbasic/Exception.st,v 1.69 1999-07-23 18:13:00 stefan Exp $'
  1633 ! !
  1655 ! !
  1634 Exception initialize!
  1656 Exception initialize!