--- a/ZeroDivide.st Thu Dec 14 14:34:21 2006 +0100
+++ b/ZeroDivide.st Fri Dec 15 12:02:36 2006 +0100
@@ -9,7 +9,6 @@
other person. No title to or ownership of the software is
hereby transferred.
"
-
"{ Package: 'stx:libbasic' }"
DomainError subclass:#ZeroDivide
@@ -52,18 +51,16 @@
[exEnd]
- the following does NOT leads into a debugger:
+ the following does NOT lead into a debugger:
[exBegin]
|divisor|
divisor := 0.
[
Transcript showCR: ( 5 / divisor ).
- ] on:ZeroDivide
- do:
- [
- Transcript flash.
- ]
+ ] on:ZeroDivide do:[
+ Transcript flash.
+ ]
[exEnd]
"
! !
@@ -97,7 +94,7 @@
!ZeroDivide class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ZeroDivide.st,v 1.6 2003-08-29 19:10:23 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ZeroDivide.st,v 1.7 2006-12-15 11:02:36 stefan Exp $'
! !
ZeroDivide initialize!