154 if (
present(
index))
then 155 insert = this%seek(
index)
156 if (.not. insert)
return 161 if (.not.
associated(this%currLink))
then 163 this%firstLink => newlink
164 this%lastLink => newlink
168 call newlink%setPrevLink(this%currlink)
169 call newlink%setNextLink(this%currlink%nextlink())
172 nextlink=>this%currlink%nextlink()