*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Thu, 03 Feb 2005 09:45:33 +0100
changeset 8730 9d369e8854e1
parent 8729 2e454c09b38a
child 8731 03a4fd5c394d
*** empty log message ***
Signal.st
--- a/Signal.st	Wed Feb 02 18:22:22 2005 +0100
+++ b/Signal.st	Thu Feb 03 09:45:33 2005 +0100
@@ -499,8 +499,8 @@
 
     <context: #return>
 
-    ^ self newException
-        suspendedContext:thisContext sender;
+    ^ (self newException
+        suspendedContext:thisContext sender)
         raise
 
     "Modified: / 2.5.1996 / 16:36:23 / cg"
@@ -515,8 +515,7 @@
     <context: #return>
 
     ^ (self newException
-        suspendedContext:thisContext sender
-        errorString:aString)
+        suspendedContext:(thisContext sender) errorString:aString)
             raise.
 
     "Modified: / 9.5.1996 / 15:17:59 / cg"
@@ -531,8 +530,7 @@
     <context: #return>
 
     ^ (self newException
-        suspendedContext:aContext
-        errorString:aString)
+        suspendedContext:aContext errorString:aString)
             raise.
 
     "Modified: / 9.5.1996 / 15:17:59 / cg"
@@ -546,10 +544,8 @@
     
     <context: #return>
 
-    ^ self newException
-        suspendedContext:thisContext sender
-            parameter:something
-            originator:something;
+    ^ (self newException
+        suspendedContext:(thisContext sender) parameter:something originator:something)
         raise
 
     "Modified: / 2.5.1996 / 16:36:38 / cg"
@@ -563,8 +559,8 @@
 
     <context: #return>
 
-    ^ self newException
-        suspendedContext:thisContext sender;
+    ^ (self newException
+        suspendedContext:thisContext sender)
         raiseRequest.
 
     "Modified: / 2.5.1996 / 16:36:52 / cg"
@@ -578,8 +574,8 @@
 
     <context: #return>
 
-    ^ self newException
-        suspendedContext:thisContext sender errorString:aString;
+    ^ (self newException
+        suspendedContext:(thisContext sender) errorString:aString)
         raiseRequest
 !
 
@@ -589,10 +585,8 @@
     
     <context: #return>
 
-    ^ (self newException)
-        suspendedContext:thisContext sender
-            parameter:something
-            originator:something;
+    ^ (self newException
+        suspendedContext:(thisContext sender) parameter:something originator:something)
         raiseRequest
 
     "Modified: / 2.5.1996 / 16:36:38 / cg"
@@ -606,8 +600,8 @@
 
     <context: #return>
 
-    ^ self newException
-        suspendedContext:thisContext sender parameter:aParameter;
+    ^ (self newException
+        suspendedContext:(thisContext sender) parameter:aParameter)
         raiseRequest.
 
     "Modified: / 9.5.1996 / 15:13:20 / cg"
@@ -621,10 +615,8 @@
 
     <context: #return>
 
-    ^ self newException
-        suspendedContext:thisContext sender
-            parameter:aParameter
-            errorString:aString;
+    ^ (self newException
+        suspendedContext:(thisContext sender) parameter:aParameter errorString:aString)
         raiseRequest
 
     "Modified: / 9.5.1996 / 15:13:35 / cg"
@@ -638,10 +630,8 @@
      The additional context is passed as the context responsible for the raise,
      allowing a raise to mimicri the exception happened somewhere else."
 
-    ^ self newException
-        suspendedContext:aContext
-            parameter:aParameter
-            errorString:aString;
+    ^ (self newException
+        suspendedContext:aContext parameter:aParameter errorString:aString)
         raiseRequest
 
     "Modified: / 26.7.1996 / 16:29:27 / cg"
@@ -654,8 +644,8 @@
      The additional context is passed as the context responsible for the raise,
      allowing a raise to mimicri the exception happened somewhere else."
 
-    ^ self newException
-        suspendedContext:aContext parameter:aParameter;
+    ^ (self newException
+        suspendedContext:aContext parameter:aParameter)
         raiseRequest
 !
 
@@ -665,8 +655,8 @@
 
     <context: #return>
 
-    ^ self newException
-        suspendedContext:thisContext sender;
+    ^ (self newException
+        suspendedContext:thisContext sender)
         raiseSignal
 
     "Modified: / 10.11.2001 / 15:13:34 / cg"
@@ -678,8 +668,8 @@
 
     <context: #return>
 
-    ^ self newException
-        suspendedContext:thisContext sender errorString:errorMessage;
+    ^ (self newException
+        suspendedContext:(thisContext sender) errorString:errorMessage)
         raiseSignal.
 
     "Modified: / 07-08-2004 / 19:24:00 / stefan"
@@ -691,10 +681,8 @@
 
     <context: #return>
 
-    ^ self newException
-        suspendedContext:thisContext sender
-            errorString:errorMessage;
-            parameter:aParameter;
+    ^ (self newException
+        suspendedContext:(thisContext sender) parameter:aParameter errorString:errorMessage) 
         raiseSignal.
 
     "Modified: / 07-08-2004 / 19:10:40 / stefan"
@@ -706,8 +694,8 @@
 
     <context: #return>
 
-    ^ self newException
-        suspendedContext:thisContext sender errorString:aString;
+    ^ (self newException
+        suspendedContext:(thisContext sender) errorString:aString)
         raiseSignal.
 !
 
@@ -717,8 +705,8 @@
 
     <context: #return>
 
-    ^ self newException
-        suspendedContext:thisContext sender parameter:aParameter;
+    ^ (self newException
+        suspendedContext:(thisContext sender) parameter:aParameter)
         raiseSignal.
 !
 
@@ -729,10 +717,8 @@
 
     <context: #return>
 
-    ^ self newException
-        suspendedContext:thisContext sender
-            parameter:aParameter
-            errorString:aString;
+    ^ (self newException
+        suspendedContext:(thisContext sender) parameter:aParameter errorString:aString)
         raiseSignal.
 !
 
@@ -742,8 +728,8 @@
 
     <context: #return>
 
-    ^ self newException
-        suspendedContext:thisContext sender parameter:aParameter;
+    ^ (self newException
+        suspendedContext:(thisContext sender) parameter:aParameter)
         raise.
 
     "Modified: / 9.5.1996 / 15:14:24 / cg"
@@ -758,10 +744,8 @@
 
     <context: #return>
 
-    ^ self newException
-        suspendedContext:thisContext sender
-            parameter:aParameter
-            errorString:aString;
+    ^ (self newException
+        suspendedContext:(thisContext sender) parameter:aParameter errorString:aString)
         raise.
 
     "Modified: / 9.5.1996 / 15:14:32 / cg"
@@ -776,10 +760,8 @@
      The additional context is passed as the context responsible for the raise,
      allowing a raise to mimicri the exception happened somewhere else."
 
-    ^ self newException
-          suspendedContext:aContext
-              parameter:aParameter
-              errorString:aString;
+    ^ (self newException
+          suspendedContext:aContext parameter:aParameter errorString:aString)
           raise.
 
     "Modified: / 26.7.1996 / 16:29:42 / cg"
@@ -955,5 +937,5 @@
 !Signal class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.97 2005-01-21 10:28:35 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.98 2005-02-03 08:45:33 cg Exp $'
 ! !