UnimplementedFunctionalityError.st
author Jan Vrany <jan.vrany@labware.com>
Wed, 02 Aug 2023 13:04:52 +0100
branchjv
changeset 25462 548cb62b20c7
parent 25443 83fff503958e
permissions -rw-r--r--
Add `NonPositionableExternalStream >> #setLocalEcho:` and `#setOutputCRLF:`

"
 COPYRIGHT (c) 2001 by eXept Software AG
              All Rights Reserved

 This software is furnished under a license and may be used
 only in accordance with the terms of that license and with the
 inclusion of the above copyright notice.   This software may not
 be provided or otherwise made available to, or used by, any
 other person.  No title to or ownership of the software is
 hereby transferred.
"
"{ Package: 'stx:libbasic' }"

"{ NameSpace: Smalltalk }"

ExecutionError subclass:#UnimplementedFunctionalityError
	instanceVariableNames:'lineNumber'
	classVariableNames:''
	poolDictionaries:''
	category:'Kernel-Exceptions-Errors'
!

!UnimplementedFunctionalityError class methodsFor:'documentation'!

copyright
"
 COPYRIGHT (c) 2001 by eXept Software AG
              All Rights Reserved

 This software is furnished under a license and may be used
 only in accordance with the terms of that license and with the
 inclusion of the above copyright notice.   This software may not
 be provided or otherwise made available to, or used by, any
 other person.  No title to or ownership of the software is
 hereby transferred.
"
!

documentation
"
    Raised when some functionality is requested that has not been implemented
    (e.g. when a method is invoked that has been marked as #shouldImplement).
"
! !

!UnimplementedFunctionalityError class methodsFor:'accessing'!

defaultNotifierString 
    ^ 'Functionality has to be implemented'

    "Modified: / 01-12-2017 / 12:49:22 / stefan"
! !

!UnimplementedFunctionalityError methodsFor:'accessing'!

lineNumber
    ^ lineNumber
!

lineNumber:something
    lineNumber := something.
! !

!UnimplementedFunctionalityError methodsFor:'printing'!

description
    |desc|

    desc := super description, ': ', originator printString.
    parameter notNil ifTrue:[
        desc := desc, '>>', parameter selector printString.
        lineNumber notNil ifTrue:[
            desc := desc,':', lineNumber printString.
        ].
    ].
    ^ desc
! !

!UnimplementedFunctionalityError class methodsFor:'documentation'!

version_CVS
    ^ '$Header$'
! !