Merge pull request #708 from fortran-lang/14NGiestas-patch-2

Fixes #706 - failure due unassigned value to a intent(out) variable.

Author: jvdp1

src/stdlib_io_npy_load.fypp

@@ -122,7 +122,10 @@ contains
         character(len=8) :: header
         character :: buf(4)
         logical :: fortran_order
-
+        
+        ! stat should be zero if no error occurred
+        stat = 0
+        
         read(io, iostat=stat) header
         if (stat /= 0) return