"{ Package: 'stx:libbasic3' }"

Change subclass:#OtherChange
	instanceVariableNames:'type file position'
	classVariableNames:''
	poolDictionaries:''
	category:'System-Changes'
!


!OtherChange methodsFor:'accessing'!

file
    "return the value of the instance variable 'file' (automatically generated)"

    ^ file
!

file:something
    "set the value of the instance variable 'file' (automatically generated)"

    file := something.
!

file:aFilename position:anInteger
    "set the value of the instance variable 'file' (automatically generated)"

    file := aFilename.
    position := anInteger
!

position
    "return the value of the instance variable 'position' (automatically generated)"

    ^ position
!

position:something
    "set the value of the instance variable 'position' (automatically generated)"

    position := something.
!

type
    "return the value of the instance variable 'type' (automatically generated)"

    ^ type
!

type:something
    "set the value of the instance variable 'type' (automatically generated)"

    type := something.
! !

!OtherChange methodsFor:'printing & storing'!

printOn:aStream
    aStream nextPutAll:'OtherChange ('.
    aStream nextPutAll:source.
    aStream nextPutAll:')'.
! !

!OtherChange class methodsFor:'documentation'!

version
    ^ '$Header: /cvs/stx/stx/libbasic3/OtherChange.st,v 1.2 2003-06-18 15:34:02 cg Exp $'
! !