Filename.st
changeset 24482 208f4f5ccba1
parent 24473 699cce1b1667
child 24483 3a420774bbff
equal deleted inserted replaced
24481:c70408eab4ad 24482:208f4f5ccba1
  4400 
  4400 
  4401     "Modified: 1.11.1996 / 20:19:24 / cg"
  4401     "Modified: 1.11.1996 / 20:19:24 / cg"
  4402 !
  4402 !
  4403 
  4403 
  4404 fileSize
  4404 fileSize
  4405     "return the size of the file in bytes"
  4405     "return the size of the file in bytes.
       
  4406      Returns 0 if it does not exist."
  4406 
  4407 
  4407     |i|
  4408     |i|
  4408 
  4409 
  4409     (i := self info) isNil ifTrue:[^ 0].
  4410     (i := self info) isNil ifTrue:[^ 0].
  4410     ^ i fileSize
  4411     ^ i fileSize