StreamNotOpenError.st
author Stefan Vogel <sv@exept.de>
Tue, 28 Apr 2020 16:21:34 +0200
changeset 25373 f030619565e1
parent 25173 9ef97d4ba8ea
permissions -rw-r--r--
#REFACTORING by stefan class: ArrayedCollection class changed: #with:
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
8727
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
     1
"
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
     2
 COPYRIGHT (c) 2004 by eXept Software AG
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
     3
              All Rights Reserved
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
     4
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
     5
 This software is furnished under a license and may be used
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
     6
 only in accordance with the terms of that license and with the
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
     7
 inclusion of the above copyright notice.   This software may not
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
     8
 be provided or otherwise made available to, or used by, any
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
     9
 other person.  No title to or ownership of the software is
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    10
 hereby transferred.
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    11
"
24509
30658b2817ac #QUALITY by stefan
Stefan Vogel <sv@exept.de>
parents: 8727
diff changeset
    12
"{ Package: 'stx:libbasic' }"
8727
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    13
24509
30658b2817ac #QUALITY by stefan
Stefan Vogel <sv@exept.de>
parents: 8727
diff changeset
    14
"{ NameSpace: Smalltalk }"
8068
4d18d2a101c9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
4d18d2a101c9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
StreamError subclass:#StreamNotOpenError
4d18d2a101c9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
	instanceVariableNames:''
4d18d2a101c9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
	classVariableNames:''
4d18d2a101c9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
	poolDictionaries:''
4d18d2a101c9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
	category:'Kernel-Exceptions-Errors'
4d18d2a101c9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
!
4d18d2a101c9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
8727
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    23
!StreamNotOpenError class methodsFor:'documentation'!
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    24
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    25
copyright
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    26
"
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    27
 COPYRIGHT (c) 2004 by eXept Software AG
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    28
              All Rights Reserved
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    29
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    30
 This software is furnished under a license and may be used
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    31
 only in accordance with the terms of that license and with the
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    32
 inclusion of the above copyright notice.   This software may not
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    33
 be provided or otherwise made available to, or used by, any
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    34
 other person.  No title to or ownership of the software is
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    35
 hereby transferred.
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    36
"
533d79aac561 copyright
Claus Gittinger <cg@exept.de>
parents: 8513
diff changeset
    37
! !
8068
4d18d2a101c9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
25173
9ef97d4ba8ea #OTHER by exept
Claus Gittinger <cg@exept.de>
parents: 24544
diff changeset
    39
!StreamNotOpenError class methodsFor:'initialization'!
9ef97d4ba8ea #OTHER by exept
Claus Gittinger <cg@exept.de>
parents: 24544
diff changeset
    40
9ef97d4ba8ea #OTHER by exept
Claus Gittinger <cg@exept.de>
parents: 24544
diff changeset
    41
initialize
9ef97d4ba8ea #OTHER by exept
Claus Gittinger <cg@exept.de>
parents: 24544
diff changeset
    42
    NotifierString := 'stream is not open'.
9ef97d4ba8ea #OTHER by exept
Claus Gittinger <cg@exept.de>
parents: 24544
diff changeset
    43
! !
9ef97d4ba8ea #OTHER by exept
Claus Gittinger <cg@exept.de>
parents: 24544
diff changeset
    44
8513
aa129fd0e35e Add description methods
Stefan Vogel <sv@exept.de>
parents: 8068
diff changeset
    45
!StreamNotOpenError methodsFor:'printing & storing'!
aa129fd0e35e Add description methods
Stefan Vogel <sv@exept.de>
parents: 8068
diff changeset
    46
aa129fd0e35e Add description methods
Stefan Vogel <sv@exept.de>
parents: 8068
diff changeset
    47
description
24544
41e1b5b7b308 #BUGFIX by exept
Claus Gittinger <cg@exept.de>
parents: 24509
diff changeset
    48
    (parameter isStream not and:[parameter notEmptyOrNil]) ifTrue:[
24509
30658b2817ac #QUALITY by stefan
Stefan Vogel <sv@exept.de>
parents: 8727
diff changeset
    49
        ^ super description, ': ', parameter classNameWithArticle.
30658b2817ac #QUALITY by stefan
Stefan Vogel <sv@exept.de>
parents: 8727
diff changeset
    50
    ].
30658b2817ac #QUALITY by stefan
Stefan Vogel <sv@exept.de>
parents: 8727
diff changeset
    51
    ^ super description.
30658b2817ac #QUALITY by stefan
Stefan Vogel <sv@exept.de>
parents: 8727
diff changeset
    52
30658b2817ac #QUALITY by stefan
Stefan Vogel <sv@exept.de>
parents: 8727
diff changeset
    53
    "Modified: / 08-08-2019 / 16:15:17 / Stefan Vogel"
8513
aa129fd0e35e Add description methods
Stefan Vogel <sv@exept.de>
parents: 8068
diff changeset
    54
! !
aa129fd0e35e Add description methods
Stefan Vogel <sv@exept.de>
parents: 8068
diff changeset
    55
8068
4d18d2a101c9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    56
!StreamNotOpenError class methodsFor:'documentation'!
4d18d2a101c9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    57
4d18d2a101c9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    58
version
24509
30658b2817ac #QUALITY by stefan
Stefan Vogel <sv@exept.de>
parents: 8727
diff changeset
    59
    ^ '$Header$'
8068
4d18d2a101c9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    60
! !
24509
30658b2817ac #QUALITY by stefan
Stefan Vogel <sv@exept.de>
parents: 8727
diff changeset
    61
25173
9ef97d4ba8ea #OTHER by exept
Claus Gittinger <cg@exept.de>
parents: 24544
diff changeset
    62
9ef97d4ba8ea #OTHER by exept
Claus Gittinger <cg@exept.de>
parents: 24544
diff changeset
    63
StreamNotOpenError initialize!