Signal.st
changeset 8730 9d369e8854e1
parent 8685 06c1d82512f5
child 8732 8807a0254968
equal deleted inserted replaced
8729:2e454c09b38a 8730:9d369e8854e1
   497     "raise a signal nonproceedable.
   497     "raise a signal nonproceedable.
   498      The signals notifierString is used as messageText."
   498      The signals notifierString is used as messageText."
   499 
   499 
   500     <context: #return>
   500     <context: #return>
   501 
   501 
   502     ^ self newException
   502     ^ (self newException
   503         suspendedContext:thisContext sender;
   503         suspendedContext:thisContext sender)
   504         raise
   504         raise
   505 
   505 
   506     "Modified: / 2.5.1996 / 16:36:23 / cg"
   506     "Modified: / 2.5.1996 / 16:36:23 / cg"
   507     "Modified: / 5.3.1998 / 16:44:36 / stefan"
   507     "Modified: / 5.3.1998 / 16:44:36 / stefan"
   508     "Created: / 23.7.1999 / 14:07:17 / stefan"
   508     "Created: / 23.7.1999 / 14:07:17 / stefan"
   513      The argument is used as messageText."
   513      The argument is used as messageText."
   514 
   514 
   515     <context: #return>
   515     <context: #return>
   516 
   516 
   517     ^ (self newException
   517     ^ (self newException
   518         suspendedContext:thisContext sender
   518         suspendedContext:(thisContext sender) errorString:aString)
   519         errorString:aString)
       
   520             raise.
   519             raise.
   521 
   520 
   522     "Modified: / 9.5.1996 / 15:17:59 / cg"
   521     "Modified: / 9.5.1996 / 15:17:59 / cg"
   523     "Modified: / 12.3.1998 / 15:15:22 / stefan"
   522     "Modified: / 12.3.1998 / 15:15:22 / stefan"
   524     "Created: / 23.7.1999 / 14:07:33 / stefan"
   523     "Created: / 23.7.1999 / 14:07:33 / stefan"
   529      The argument is used as messageText."
   528      The argument is used as messageText."
   530 
   529 
   531     <context: #return>
   530     <context: #return>
   532 
   531 
   533     ^ (self newException
   532     ^ (self newException
   534         suspendedContext:aContext
   533         suspendedContext:aContext errorString:aString)
   535         errorString:aString)
       
   536             raise.
   534             raise.
   537 
   535 
   538     "Modified: / 9.5.1996 / 15:17:59 / cg"
   536     "Modified: / 9.5.1996 / 15:17:59 / cg"
   539     "Modified: / 12.3.1998 / 15:15:22 / stefan"
   537     "Modified: / 12.3.1998 / 15:15:22 / stefan"
   540     "Created: / 23.7.1999 / 14:07:33 / stefan"
   538     "Created: / 23.7.1999 / 14:07:33 / stefan"
   544     "raise a signal nonproceedable.
   542     "raise a signal nonproceedable.
   545      The argument, something is passed both as parameter and originator."
   543      The argument, something is passed both as parameter and originator."
   546     
   544     
   547     <context: #return>
   545     <context: #return>
   548 
   546 
   549     ^ self newException
   547     ^ (self newException
   550         suspendedContext:thisContext sender
   548         suspendedContext:(thisContext sender) parameter:something originator:something)
   551             parameter:something
       
   552             originator:something;
       
   553         raise
   549         raise
   554 
   550 
   555     "Modified: / 2.5.1996 / 16:36:38 / cg"
   551     "Modified: / 2.5.1996 / 16:36:38 / cg"
   556     "Modified: / 5.3.1998 / 16:49:55 / stefan"
   552     "Modified: / 5.3.1998 / 16:49:55 / stefan"
   557     "Created: / 23.7.1999 / 14:07:59 / stefan"
   553     "Created: / 23.7.1999 / 14:07:59 / stefan"
   561     "raise a signal proceedable.
   557     "raise a signal proceedable.
   562      The signals notifierString is used as messageText."
   558      The signals notifierString is used as messageText."
   563 
   559 
   564     <context: #return>
   560     <context: #return>
   565 
   561 
   566     ^ self newException
   562     ^ (self newException
   567         suspendedContext:thisContext sender;
   563         suspendedContext:thisContext sender)
   568         raiseRequest.
   564         raiseRequest.
   569 
   565 
   570     "Modified: / 2.5.1996 / 16:36:52 / cg"
   566     "Modified: / 2.5.1996 / 16:36:52 / cg"
   571     "Modified: / 5.3.1998 / 16:50:46 / stefan"
   567     "Modified: / 5.3.1998 / 16:50:46 / stefan"
   572     "Created: / 23.7.1999 / 14:08:24 / stefan"
   568     "Created: / 23.7.1999 / 14:08:24 / stefan"
   576     "raise a signal proceedable.
   572     "raise a signal proceedable.
   577      The argument, aString is used as messageText."
   573      The argument, aString is used as messageText."
   578 
   574 
   579     <context: #return>
   575     <context: #return>
   580 
   576 
   581     ^ self newException
   577     ^ (self newException
   582         suspendedContext:thisContext sender errorString:aString;
   578         suspendedContext:(thisContext sender) errorString:aString)
   583         raiseRequest
   579         raiseRequest
   584 !
   580 !
   585 
   581 
   586 raiseRequestFrom:something 
   582 raiseRequestFrom:something 
   587     "raise a signal proceedable.
   583     "raise a signal proceedable.
   588      The argument, something is passed both as parameter and originator."
   584      The argument, something is passed both as parameter and originator."
   589     
   585     
   590     <context: #return>
   586     <context: #return>
   591 
   587 
   592     ^ (self newException)
   588     ^ (self newException
   593         suspendedContext:thisContext sender
   589         suspendedContext:(thisContext sender) parameter:something originator:something)
   594             parameter:something
       
   595             originator:something;
       
   596         raiseRequest
   590         raiseRequest
   597 
   591 
   598     "Modified: / 2.5.1996 / 16:36:38 / cg"
   592     "Modified: / 2.5.1996 / 16:36:38 / cg"
   599     "Modified: / 5.3.1998 / 16:52:46 / stefan"
   593     "Modified: / 5.3.1998 / 16:52:46 / stefan"
   600     "Created: / 23.7.1999 / 14:08:36 / stefan"
   594     "Created: / 23.7.1999 / 14:08:36 / stefan"
   604     "raise a signal proceedable.
   598     "raise a signal proceedable.
   605      The signals notifierString is used as messageText."
   599      The signals notifierString is used as messageText."
   606 
   600 
   607     <context: #return>
   601     <context: #return>
   608 
   602 
   609     ^ self newException
   603     ^ (self newException
   610         suspendedContext:thisContext sender parameter:aParameter;
   604         suspendedContext:(thisContext sender) parameter:aParameter)
   611         raiseRequest.
   605         raiseRequest.
   612 
   606 
   613     "Modified: / 9.5.1996 / 15:13:20 / cg"
   607     "Modified: / 9.5.1996 / 15:13:20 / cg"
   614     "Modified: / 12.3.1998 / 15:16:57 / stefan"
   608     "Modified: / 12.3.1998 / 15:16:57 / stefan"
   615     "Created: / 23.7.1999 / 14:08:48 / stefan"
   609     "Created: / 23.7.1999 / 14:08:48 / stefan"
   619     "raise a signal proceedable.
   613     "raise a signal proceedable.
   620      The argument, aString is used as messageText."
   614      The argument, aString is used as messageText."
   621 
   615 
   622     <context: #return>
   616     <context: #return>
   623 
   617 
   624     ^ self newException
   618     ^ (self newException
   625         suspendedContext:thisContext sender
   619         suspendedContext:(thisContext sender) parameter:aParameter errorString:aString)
   626             parameter:aParameter
       
   627             errorString:aString;
       
   628         raiseRequest
   620         raiseRequest
   629 
   621 
   630     "Modified: / 9.5.1996 / 15:13:35 / cg"
   622     "Modified: / 9.5.1996 / 15:13:35 / cg"
   631     "Modified: / 12.3.1998 / 15:17:52 / stefan"
   623     "Modified: / 12.3.1998 / 15:17:52 / stefan"
   632     "Created: / 23.7.1999 / 14:08:57 / stefan"
   624     "Created: / 23.7.1999 / 14:08:57 / stefan"
   636     "raise a signal proceedable.
   628     "raise a signal proceedable.
   637      The argument, aString is used as messageText.
   629      The argument, aString is used as messageText.
   638      The additional context is passed as the context responsible for the raise,
   630      The additional context is passed as the context responsible for the raise,
   639      allowing a raise to mimicri the exception happened somewhere else."
   631      allowing a raise to mimicri the exception happened somewhere else."
   640 
   632 
   641     ^ self newException
   633     ^ (self newException
   642         suspendedContext:aContext
   634         suspendedContext:aContext parameter:aParameter errorString:aString)
   643             parameter:aParameter
       
   644             errorString:aString;
       
   645         raiseRequest
   635         raiseRequest
   646 
   636 
   647     "Modified: / 26.7.1996 / 16:29:27 / cg"
   637     "Modified: / 26.7.1996 / 16:29:27 / cg"
   648     "Modified: / 12.3.1998 / 15:18:34 / stefan"
   638     "Modified: / 12.3.1998 / 15:18:34 / stefan"
   649     "Created: / 23.7.1999 / 14:09:07 / stefan"
   639     "Created: / 23.7.1999 / 14:09:07 / stefan"
   652 raiseRequestWith:aParameter in:aContext
   642 raiseRequestWith:aParameter in:aContext
   653     "raise a signal proceedable.
   643     "raise a signal proceedable.
   654      The additional context is passed as the context responsible for the raise,
   644      The additional context is passed as the context responsible for the raise,
   655      allowing a raise to mimicri the exception happened somewhere else."
   645      allowing a raise to mimicri the exception happened somewhere else."
   656 
   646 
   657     ^ self newException
   647     ^ (self newException
   658         suspendedContext:aContext parameter:aParameter;
   648         suspendedContext:aContext parameter:aParameter)
   659         raiseRequest
   649         raiseRequest
   660 !
   650 !
   661 
   651 
   662 raiseSignal
   652 raiseSignal
   663     "raise a signal (proceedable or not, whatever the proceedability is).
   653     "raise a signal (proceedable or not, whatever the proceedability is).
   664      The signals notifierString is used as messageText."
   654      The signals notifierString is used as messageText."
   665 
   655 
   666     <context: #return>
   656     <context: #return>
   667 
   657 
   668     ^ self newException
   658     ^ (self newException
   669         suspendedContext:thisContext sender;
   659         suspendedContext:thisContext sender)
   670         raiseSignal
   660         raiseSignal
   671 
   661 
   672     "Modified: / 10.11.2001 / 15:13:34 / cg"
   662     "Modified: / 10.11.2001 / 15:13:34 / cg"
   673 !
   663 !
   674 
   664 
   676     "ANSI: raise a signal (proceedable or not, whatever the proceedability is).
   666     "ANSI: raise a signal (proceedable or not, whatever the proceedability is).
   677      The argument, errorMessage is used as messageText."
   667      The argument, errorMessage is used as messageText."
   678 
   668 
   679     <context: #return>
   669     <context: #return>
   680 
   670 
   681     ^ self newException
   671     ^ (self newException
   682         suspendedContext:thisContext sender errorString:errorMessage;
   672         suspendedContext:(thisContext sender) errorString:errorMessage)
   683         raiseSignal.
   673         raiseSignal.
   684 
   674 
   685     "Modified: / 07-08-2004 / 19:24:00 / stefan"
   675     "Modified: / 07-08-2004 / 19:24:00 / stefan"
   686 !
   676 !
   687 
   677 
   689     "ANSI: raise a signal (proceedable or not, whatever the proceedability is).
   679     "ANSI: raise a signal (proceedable or not, whatever the proceedability is).
   690      The argument, errorMessage is used as messageText."
   680      The argument, errorMessage is used as messageText."
   691 
   681 
   692     <context: #return>
   682     <context: #return>
   693 
   683 
   694     ^ self newException
   684     ^ (self newException
   695         suspendedContext:thisContext sender
   685         suspendedContext:(thisContext sender) parameter:aParameter errorString:errorMessage) 
   696             errorString:errorMessage;
       
   697             parameter:aParameter;
       
   698         raiseSignal.
   686         raiseSignal.
   699 
   687 
   700     "Modified: / 07-08-2004 / 19:10:40 / stefan"
   688     "Modified: / 07-08-2004 / 19:10:40 / stefan"
   701 !
   689 !
   702 
   690 
   704     "raise a signal (proceedable or not, whatever the proceedability is).
   692     "raise a signal (proceedable or not, whatever the proceedability is).
   705      The argument, aString is used as messageText."
   693      The argument, aString is used as messageText."
   706 
   694 
   707     <context: #return>
   695     <context: #return>
   708 
   696 
   709     ^ self newException
   697     ^ (self newException
   710         suspendedContext:thisContext sender errorString:aString;
   698         suspendedContext:(thisContext sender) errorString:aString)
   711         raiseSignal.
   699         raiseSignal.
   712 !
   700 !
   713 
   701 
   714 raiseSignalWith:aParameter
   702 raiseSignalWith:aParameter
   715     "raise a signal (proceedable or not, whatever the proceedability is).
   703     "raise a signal (proceedable or not, whatever the proceedability is).
   716      The argument, aParameter is passed as parameter."
   704      The argument, aParameter is passed as parameter."
   717 
   705 
   718     <context: #return>
   706     <context: #return>
   719 
   707 
   720     ^ self newException
   708     ^ (self newException
   721         suspendedContext:thisContext sender parameter:aParameter;
   709         suspendedContext:(thisContext sender) parameter:aParameter)
   722         raiseSignal.
   710         raiseSignal.
   723 !
   711 !
   724 
   712 
   725 raiseSignalWith:aParameter errorString:aString
   713 raiseSignalWith:aParameter errorString:aString
   726     "raise a signal (proceedable or not, whatever the proceedability is).
   714     "raise a signal (proceedable or not, whatever the proceedability is).
   727      The argument, aString is used as messageText,
   715      The argument, aString is used as messageText,
   728      aParameter is passed as exception parameter."
   716      aParameter is passed as exception parameter."
   729 
   717 
   730     <context: #return>
   718     <context: #return>
   731 
   719 
   732     ^ self newException
   720     ^ (self newException
   733         suspendedContext:thisContext sender
   721         suspendedContext:(thisContext sender) parameter:aParameter errorString:aString)
   734             parameter:aParameter
       
   735             errorString:aString;
       
   736         raiseSignal.
   722         raiseSignal.
   737 !
   723 !
   738 
   724 
   739 raiseWith:aParameter
   725 raiseWith:aParameter
   740     "raise a signal nonproceedable.
   726     "raise a signal nonproceedable.
   741      The argument, aParameter is passed as parameter."
   727      The argument, aParameter is passed as parameter."
   742 
   728 
   743     <context: #return>
   729     <context: #return>
   744 
   730 
   745     ^ self newException
   731     ^ (self newException
   746         suspendedContext:thisContext sender parameter:aParameter;
   732         suspendedContext:(thisContext sender) parameter:aParameter)
   747         raise.
   733         raise.
   748 
   734 
   749     "Modified: / 9.5.1996 / 15:14:24 / cg"
   735     "Modified: / 9.5.1996 / 15:14:24 / cg"
   750     "Modified: / 12.3.1998 / 15:19:11 / stefan"
   736     "Modified: / 12.3.1998 / 15:19:11 / stefan"
   751     "Created: / 23.7.1999 / 14:09:27 / stefan"
   737     "Created: / 23.7.1999 / 14:09:27 / stefan"
   756      The argument, aString is used as messageText,
   742      The argument, aString is used as messageText,
   757      aParameter is passed as exception parameter."
   743      aParameter is passed as exception parameter."
   758 
   744 
   759     <context: #return>
   745     <context: #return>
   760 
   746 
   761     ^ self newException
   747     ^ (self newException
   762         suspendedContext:thisContext sender
   748         suspendedContext:(thisContext sender) parameter:aParameter errorString:aString)
   763             parameter:aParameter
       
   764             errorString:aString;
       
   765         raise.
   749         raise.
   766 
   750 
   767     "Modified: / 9.5.1996 / 15:14:32 / cg"
   751     "Modified: / 9.5.1996 / 15:14:32 / cg"
   768     "Modified: / 12.3.1998 / 15:19:40 / stefan"
   752     "Modified: / 12.3.1998 / 15:19:40 / stefan"
   769     "Created: / 23.7.1999 / 14:09:36 / stefan"
   753     "Created: / 23.7.1999 / 14:09:36 / stefan"
   774      The argument, aString is used as messageText, aParameter is passed
   758      The argument, aString is used as messageText, aParameter is passed
   775      as exception parameter.
   759      as exception parameter.
   776      The additional context is passed as the context responsible for the raise,
   760      The additional context is passed as the context responsible for the raise,
   777      allowing a raise to mimicri the exception happened somewhere else."
   761      allowing a raise to mimicri the exception happened somewhere else."
   778 
   762 
   779     ^ self newException
   763     ^ (self newException
   780           suspendedContext:aContext
   764           suspendedContext:aContext parameter:aParameter errorString:aString)
   781               parameter:aParameter
       
   782               errorString:aString;
       
   783           raise.
   765           raise.
   784 
   766 
   785     "Modified: / 26.7.1996 / 16:29:42 / cg"
   767     "Modified: / 26.7.1996 / 16:29:42 / cg"
   786     "Modified: / 12.3.1998 / 15:20:12 / stefan"
   768     "Modified: / 12.3.1998 / 15:20:12 / stefan"
   787     "Created: / 23.7.1999 / 14:09:46 / stefan"
   769     "Created: / 23.7.1999 / 14:09:46 / stefan"
   953 ! !
   935 ! !
   954 
   936 
   955 !Signal class methodsFor:'documentation'!
   937 !Signal class methodsFor:'documentation'!
   956 
   938 
   957 version
   939 version
   958     ^ '$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.97 2005-01-21 10:28:35 stefan Exp $'
   940     ^ '$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.98 2005-02-03 08:45:33 cg Exp $'
   959 ! !
   941 ! !