Issue 151178
Summary [flang] Runtime error with DC editor : Part 2
Labels flang:runtime
Assignees
Reporter DanielCChen
    The following code still fails after PR #150512
```
program main
 logical(4) :: l1(100)

    open (1, form='formatted', status='scratch', access='stream')

    write (1, 500)

    rewind 1

    read (1, '(dc, 100l5)') l1

    close(1)

500 format (DC, 1x, 50('.T;F.;'))

end
```

```
> a.out

fatal Fortran runtime error(t.f:10): Bad character ';' in LOGICAL input field
IOT/Abort trap(coredump)
```
_______________________________________________
llvm-bugs mailing list
llvm-bugs@lists.llvm.org
https://lists.llvm.org/cgi-bin/mailman/listinfo/llvm-bugs

Reply via email to