Fix a typo - thanks NU0C.

This commit is contained in:
Steve Franke 2018-09-26 08:30:41 -05:00
parent 13b5cc479b
commit a09385604a

View File

@ -26,7 +26,7 @@ module crc
integer (c_int), value :: length
end function crc13
function crc13_check (data, length) bind (C, name="crc14_check")
function crc13_check (data, length) bind (C, name="crc13_check")
use, intrinsic :: iso_c_binding, only: c_bool, c_ptr, c_int
implicit none
logical (c_bool) :: crc13_check