[all-commits] [llvm/llvm-project] 4f9cb7: [flang][runtime] Fix octal input of REAL(10) (#74658)

[Peter Klausler via All-commits]

  Branch: refs/heads/main
  Home:   https://github.com/llvm/llvm-project
  Commit: 4f9cb79a442fe39d02c05dff07625014976c6769
      https://github.com/llvm/llvm-project/commit/4f9cb79a442fe39d02c05dff07625014976c6769
  Author: Peter Klausler <35819229+klausler at users.noreply.github.com>
  Date:   2023-12-11 (Mon, 11 Dec 2023)

  Changed paths:
    M flang/runtime/edit-input.cpp

  Log Message:
  -----------
  [flang][runtime] Fix octal input of REAL(10) (#74658)

The overflow check didn't work for a 27-digit octal field containing an
80-bit x87 extended precision real value. The count of bytes required
was too large because the leading digit (1) was assumed to require a
full three bits. And the actual transmission of the octal input digits
to the output buffer was incorrect, too.

Fixes llvm-test-suite/Fortran/gfortran/regression/boz_15.f90.