[bugfix] fix typos in fsys_sleep.fypp

yymmt742 · Jun 4, 2024 · 5cfaea6 · 5cfaea6
1 parent 9244ff8
commit 5cfaea6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/fsys_sleep.fypp b/src/fsys_sleep.fypp
@@ -8,7 +8,7 @@ submodule(fsys) fsys_sleep
     subroutine Sleep(dwMillseconds) bind(c)
       import C_LONG
       integer(C_LONG), value, intent(in) :: dwMillseconds
-    end function Sleep
+    end subroutine Sleep
 #:else
     function usleep(usec) bind(c)
       import C_INT