ZeroDivide.st
branchjv
changeset 20578 39641ba8d6e0
parent 18017 7fef9e17913f
parent 20458 55727803f73d
child 23547 c69c97cec351
equal deleted inserted replaced
20577:a27e7b3031cb 20578:39641ba8d6e0
       
     1 "{ Encoding: utf8 }"
       
     2 
     1 "
     3 "
     2  COPYRIGHT (c) 2001 by eXept Software AG
     4  COPYRIGHT (c) 2001 by eXept Software AG
     3               All Rights Reserved
     5               All Rights Reserved
     4 
     6 
     5  This software is furnished under a license and may be used
     7  This software is furnished under a license and may be used
     8  be provided or otherwise made available to, or used by, any
    10  be provided or otherwise made available to, or used by, any
     9  other person.  No title to or ownership of the software is
    11  other person.  No title to or ownership of the software is
    10  hereby transferred.
    12  hereby transferred.
    11 "
    13 "
    12 "{ Package: 'stx:libbasic' }"
    14 "{ Package: 'stx:libbasic' }"
       
    15 
       
    16 "{ NameSpace: Smalltalk }"
    13 
    17 
    14 DomainError subclass:#ZeroDivide
    18 DomainError subclass:#ZeroDivide
    15 	instanceVariableNames:''
    19 	instanceVariableNames:''
    16 	classVariableNames:''
    20 	classVariableNames:''
    17 	poolDictionaries:''
    21 	poolDictionaries:''
    74 
    78 
    75 
    79 
    76 !ZeroDivide methodsFor:'accessing'!
    80 !ZeroDivide methodsFor:'accessing'!
    77 
    81 
    78 defaultResumeValue
    82 defaultResumeValue
    79     "no, we return infinity here, if ever proceeded"
    83     "return infinity here, if ever proceeded"
    80 
    84 
    81     ^ parameter receiver class infinity
    85     ^ parameter receiver class infinity
    82 
    86 
    83     "
    87     "
    84      |a b|
    88      |a b|
   127 
   131 
   128 
   132 
   129 !ZeroDivide class methodsFor:'documentation'!
   133 !ZeroDivide class methodsFor:'documentation'!
   130 
   134 
   131 version
   135 version
   132     ^ '$Header: /cvs/stx/stx/libbasic/ZeroDivide.st,v 1.8 2013-01-25 17:19:34 cg Exp $'
   136     ^ '$Header$'
   133 !
   137 !
   134 
   138 
   135 version_SVN
   139 version_SVN
   136     ^ '$Id: ZeroDivide.st 10761 2012-01-19 11:46:00Z vranyj1 $'
   140     ^ '$Id: ZeroDivide.st 10761 2012-01-19 11:46:00Z vranyj1 $'
   137 ! !
   141 ! !