35 use,
intrinsic :: iso_c_binding
40 kim_sem_ver_get_sem_ver, &
41 kim_sem_ver_is_less_than, &
42 kim_sem_ver_parse_sem_ver
45 subroutine kim_sem_ver_get_sem_ver(version)
46 use,
intrinsic :: iso_c_binding
48 character(len=*, kind=c_char),
intent(out) :: version
49 end subroutine kim_sem_ver_get_sem_ver
51 subroutine kim_sem_ver_is_less_than(version_a, version_b, is_less_than, &
53 use,
intrinsic :: iso_c_binding
55 character(len=*, kind=c_char),
intent(in) :: version_a
56 character(len=*, kind=c_char),
intent(in) :: version_b
57 integer(c_int),
intent(out) :: is_less_than
58 integer(c_int),
intent(out) :: ierr
59 end subroutine kim_sem_ver_is_less_than
61 subroutine kim_sem_ver_parse_sem_ver(version, major, minor, patch, &
62 prerelease, build_metadata, ierr)
63 use,
intrinsic :: iso_c_binding
65 character(len=*, kind=c_char),
intent(in) :: version
66 integer(c_int),
intent(out) :: major
67 integer(c_int),
intent(out) :: minor
68 integer(c_int),
intent(out) :: patch
69 character(len=*, kind=c_char),
intent(inout) :: prerelease
70 character(len=*, kind=c_char),
intent(inout) :: build_metadata
71 integer(c_int),
intent(out) :: ierr
72 end subroutine kim_sem_ver_parse_sem_ver