FTLinkedListRecordClass Module

FTLinkedListRecord is the record type (object and next) for the LinkedList class.

One will generally not instantiate a record oneself. They are created automatically when one adds an object to a linked list.



Interfaces

public interface release


Derived Types

type, public, extends(FTObject) ::  FTLinkedListRecord

Components

Type Visibility Attributes Name Initial
class(FTObject), public, POINTER :: recordObject => NULL()
class(FTLinkedListRecord), public, POINTER :: next => NULL()
class(FTLinkedListRecord), public, POINTER :: previous => NULL()

Type-Bound Procedures

procedure, public :: init => initFTObject
procedure, public :: description => FTObjectDescription
procedure, public, non_overridable :: copy => copyFTObject
procedure, public, non_overridable :: retain => retainFTObject
procedure, public, non_overridable :: isUnreferenced
procedure, public, non_overridable :: refCount
procedure, public :: initWithObject
procedure, public :: destruct => destructFTLinkedListRecord
procedure, public :: printDescription => printFTLinkedRecordDescription
procedure, public :: className => llRecordClassName

Functions

public function llRecordClassName(self) result(s)

Class name returns a string with the name of the type of the object

Read more…

Arguments

Type IntentOptional Attributes Name
class(FTLinkedListRecord) :: self

Return Value character(len=CLASS_NAME_CHARACTER_LENGTH)


Subroutines

public subroutine initWithObject(self, obj)

Arguments

Type IntentOptional Attributes Name
class(FTLinkedListRecord) :: self
class(FTObject), POINTER :: obj

public subroutine destructFTLinkedListRecord(self)

The destructor must only be called from within subclass destructors

Arguments

Type IntentOptional Attributes Name
class(FTLinkedListRecord) :: self

public subroutine releaseFTLinkedListRecord(self)

Arguments

Type IntentOptional Attributes Name
class(FTLinkedListRecord), POINTER :: self

public subroutine printFTLinkedRecordDescription(self, iUnit)

Arguments

Type IntentOptional Attributes Name
class(FTLinkedListRecord) :: self
integer :: iUnit