@@ -554,9 +554,9 @@ contains
554554 !>
555555 !> Reads a whole ASCII file and loads its contents into a string variable.
556556 !> The function handles error states and optionally deletes the file after reading.
557- subroutine getfile_string(fileName ,file,err,delete)
557+ subroutine getfile_string(filename ,file,err,delete)
558558 !> Input file name
559- character(*), intent(in) :: fileName
559+ character(*), intent(in) :: filename
560560 !> Output string variable
561561 type(string_type), intent(out) :: file
562562 !> [optional] State return flag. On error, if not requested, the code will stop.
@@ -565,10 +565,10 @@ contains
565565 logical, optional, intent(in) :: delete
566566
567567 ! Local variables
568- character(len=:), allocatable :: fileString
568+ character(len=:), allocatable :: filestring
569569
570570 ! Process output
571- call getfile_char(fileName,fileString ,err,delete)
571+ call getfile_char(filename,filestring ,err,delete)
572572 call move(from=fileString,to=file)
573573
574574 end subroutine getfile_string
0 commit comments