diff options
Diffstat (limited to 'libgfortran/io/file_pos.c')
| -rw-r--r-- | libgfortran/io/file_pos.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/io/file_pos.c b/libgfortran/io/file_pos.c index 6dafbe59028..25b0108eef4 100644 --- a/libgfortran/io/file_pos.c +++ b/libgfortran/io/file_pos.c @@ -120,7 +120,7 @@ unformatted_backspace (st_parameter_filepos *fpp, gfc_unit *u) goto io_error; /* Only GFC_CONVERT_NATIVE and GFC_CONVERT_SWAP are valid here. */ - if (u->flags.convert == GFC_CONVERT_NATIVE) + if (likely (u->flags.convert == GFC_CONVERT_NATIVE)) { switch (length) { |