UndefinedObject.st
changeset 23568 3d89374701ba
parent 23554 f82e83c4076c
child 23685 803f30d27e96
equal deleted inserted replaced
23567:07b2679e1347 23568:3d89374701ba
   235 
   235 
   236     ^ self
   236     ^ self
   237 ! !
   237 ! !
   238 
   238 
   239 !UndefinedObject methodsFor:'debugging'!
   239 !UndefinedObject methodsFor:'debugging'!
       
   240 
       
   241 assertNotNil
       
   242     "fail and report an error, if the receiver is nil"
       
   243 
       
   244     <resource: #skipInDebuggersWalkBack>
       
   245 
       
   246     "/ intentionally left empty
       
   247     self assert:false message:'value should not be nil here'
       
   248 
       
   249     "
       
   250      self assertNotNil
       
   251      nil assertNotNil
       
   252     "
       
   253 
       
   254     "Created: / 18-12-2018 / 15:40:07 / Claus Gittinger"
       
   255 !
   240 
   256 
   241 haltIfNil
   257 haltIfNil
   242     "halt if the receiver is nil"
   258     "halt if the receiver is nil"
   243 
   259 
   244     <resource: #skipInDebuggersWalkBack>
   260     <resource: #skipInDebuggersWalkBack>
   773 
   789 
   774     ^ aVisitor visitNilWith:aParameter
   790     ^ aVisitor visitNilWith:aParameter
   775 ! !
   791 ! !
   776 
   792 
   777 
   793 
   778 
       
   779 !UndefinedObject class methodsFor:'documentation'!
   794 !UndefinedObject class methodsFor:'documentation'!
   780 
   795 
   781 version
   796 version
   782     ^ '$Header$'
   797     ^ '$Header$'
   783 !
   798 !