llvm-project/flang/test/Preprocessing/hollerith.f

! RUN: %flang -E %s 2>&1 | FileCheck %s
! CHECK: character*1hi
! CHECK: dataa/1*1h /
! CHECK: datab/1*1h /
! CHECK: do1h=1,2
      CHARACTER*1H I
      CHARACTER*1 A,B
      INTEGER H
      DATA A/1*1H /
      DATA B/
     +1*1H /
      DO1H =1,2
 1    CONTINUE
      END
[flang][driver] Update PP tests to use the new driver Update the preprocessor regression tests to use the new driver if the new driver is built (FLANG_BUILD_NEW_DRIVER=On), otherwise the tests will still run using f18. Summary of changes: - Introduce %flang to the regression tests, which points to the new driver if it is built or otherwise points to f18 - Update all tests in flang/test/Preprocessing/ to use %flang Differential Revision: https://reviews.llvm.org/D94805 2021-01-25 20:07:17 +08:00			`! RUN: %flang -E %s 2>&1 \| FileCheck %s`
[flang] Fix edge case with Hollerith To prevent mistokenization of CHARACTER2HXY as a Hollerith literal constant while allowing it in DATA A/22HXY/, there's a little state that tracks whether a / has been seen earlier in the same statement. But it was being reset on each line, not statement, so Hollerith in a DATA statement continuation line was incorrectly tokenized. Fixed. Differential Revision: https://reviews.llvm.org/D85571 2020-08-08 07:44:08 +08:00			`! CHECK: character*1hi`
			`! CHECK: dataa/1*1h /`
			`! CHECK: datab/1*1h /`
			`! CHECK: do1h=1,2`
			`CHARACTER*1H I`
			`CHARACTER*1 A,B`
			`INTEGER H`
			`DATA A/1*1H /`
			`DATA B/`
			`+1*1H /`
			`DO1H =1,2`
			`1 CONTINUE`
			`END`