Skip to content

Commit

Permalink
yaml_parser_mod: Use integral error code
Browse files Browse the repository at this point in the history
Use an integral value for the error code returned by `open_and_parse_file_wrap`
in `yaml_parser_mod`. This fixes a build error with the Cray compiler.
  • Loading branch information
Jesse Lentz authored and Jesse Lentz committed Aug 29, 2024
1 parent 53c55b4 commit fda8ac6
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion parser/yaml_parser.F90
Original file line number Diff line number Diff line change
Expand Up @@ -76,7 +76,7 @@ function open_and_parse_file_wrap(filename, file_id) bind(c) &
use iso_c_binding, only: c_char, c_int, c_bool
character(kind=c_char), intent(in) :: filename(*) !< Filename of the yaml file
integer(kind=c_int), intent(out) :: file_id !< File id corresponding to the yaml file that was opened
logical(kind=c_int) :: error_code !< Flag indicating the error message (1 if sucessful)
integer(kind=c_int) :: error_code !< Flag indicating the error message (1 if sucessful)
end function open_and_parse_file_wrap

!> @brief Private c function that checks if a file_id is valid (see yaml_parser_binding.c)
Expand Down

0 comments on commit fda8ac6

Please sign in to comment.