--- a/Signal.st	Wed Aug 30 20:25:51 1995 +0200
+++ b/Signal.st	Thu Aug 31 05:15:46 1995 +0200
@@ -22,7 +22,7 @@
 COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.26 1995-08-23 17:50:18 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.27 1995-08-31 03:15:33 claus Exp $
 '!
 
 !Signal class methodsFor:'documentation'!
@@ -43,7 +43,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.26 1995-08-23 17:50:18 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.27 1995-08-31 03:15:33 claus Exp $
 "
 !
 
@@ -148,7 +148,7 @@
 new
     "return a new signal"
 
-    ^ self basicNew notifierString:'signal'
+    ^ (self basicNew) notifierString:'signal'
 ! !
 
 !Signal class methodsFor:'Signal constants'!
@@ -201,12 +201,22 @@
 
 mayProceed:aBoolean
     "set/clear the signals ability to proceed.
-     This flag is not checked in the current version of
-     the debugger."
+     This flag is (currently) not checked by the system;
+     be prepared for changes here, to eventually have nonProceedable
+     signals refuse to let you continue execution."
 
     mayProceed := aBoolean
 !
 
+mayProceed
+    "return the signals ability to proceed.
+     This flag is (currently) not checked by the system;
+     be prepared for changes here, to eventually have nonProceedable
+     signals refuse to let you continue execution."
+
+    ^ mayProceed
+!
+
 parent:aSignal 
     "set the parent-signal of the receiver."
 
@@ -354,17 +364,18 @@
       "
 !
 
-ignore:aBlock
+ignoreIn:aBlock
      "evaluate the argument, aBlock.
       Ignore the receiver-signal during evaluation - i.e. simply
-      continue. This makes only sense for some signals, such as UserInterrupt
-      or AbortSignals, because continuing after an exception without any cleanup
-      will often lead to followup-errors."
+      continue. 
+      This makes only sense for some signals, such as UserInterrupt
+      or AbortSignal, because continuing after an exception without any cleanup
+      often leads to followup-errors."
 
       ^ self handle:[:ex | ex proceed] do:aBlock.
 
       "
-       Object messageNotUnderstoodSignal ignore:[
+       Object messageNotUnderstoodSignal ignoreIn:[
 	  123 size open   
        ]
       "