intel compiler issue: remove buffer write

Author: perazz

src/stdlib_linalg_state.fypp

@@ -341,16 +341,13 @@ module stdlib_linalg_state
        character(len=*),intent(inout) :: msg
        character,optional,intent(in) :: prefix
 
-       character(len=MSG_LENGTH) :: buffer
-       
        if (present(a)) then 
           select rank (v=>a)
              rank (0)
                 call append (msg,v,prefix)
              rank (1)
                 call appendv(msg,v)
              rank default
-                write (buffer,'(i0)') rank(v)
                 msg = trim(msg)//' <ERROR: INVALID RANK>'
 
           end select