31 procedure :: current => currentbyte
32 procedure :: display => displaybyte
39subroutine displaybyte(this)
40class(byteList),
intent(inout) :: this
43do while(this%element())
44 print *,
"index:",this%currentindex(),
" value:", this%current()
47end subroutine displaybyte
61integer(kind=int_b) function currentbyte(this)
62class(byteList) :: this
65v => this%currentpoli()
67type is (
integer(kind=int_b))
70end function currentbyte
Definition of constants to be used for declaring variables of a desired type.
abstract class to use lists in fortran 2003.
class to use lists in fortran 2003.
Abstract implementation of doubly-linked list.
Byte specific implementation of doubly-linked list.