File: fsave-optimization-record.f90

package info (click to toggle)
llvm-toolchain-20 1%3A20.1.8-1
  • links: PTS, VCS
  • area: main
  • in suites: experimental
  • size: 2,111,696 kB
  • sloc: cpp: 7,438,781; ansic: 1,393,871; asm: 1,012,926; python: 241,771; f90: 86,635; objc: 75,411; lisp: 42,144; pascal: 17,286; sh: 8,596; ml: 5,082; perl: 4,730; makefile: 3,591; awk: 3,523; javascript: 2,251; xml: 892; fortran: 672
file content (59 lines) | stat: -rw-r--r-- 1,659 bytes parent folder | download | duplicates (12)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
! Tests for the '-f[no-]save-optimization-record[=<format>]' flag.

! Test opt_record flags get generated for fc1
! RUN: %flang -### %s 2>&1 \
! RUN:     -foptimization-record-file=%t.opt.yaml \
! RUN:   | FileCheck --check-prefix=YAML %s

! RUN: %flang -### %s 2>&1 \
! RUN:     -fsave-optimization-record \
! RUN:   | FileCheck --check-prefix=YAML %s


! Test -foptimization-record-file produces YAML file with given content
! RUN: rm -f %t.opt.yaml
! RUN: %flang -foptimization-record-file=%t.opt.yaml -c %s
! RUN: cat %t.opt.yaml | FileCheck %s


! Test -fsave-optimization-record produces YAML file with given content
! RUN: rm -f %t.opt.yaml
! RUN: %flang -fsave-optimization-record -c -o %t.o %s
! RUN: cat %t.opt.yaml | FileCheck %s

! RUN: rm -f %t.opt.yaml
! RUN: %flang -fsave-optimization-record -S -o %t.s %s
! RUN: cat %t.opt.yaml | FileCheck %s


! Produces an empty file
! RUN: rm -f %t.opt.yaml
! RUN: %flang -fsave-optimization-record -S -emit-llvm -o %t.ll %s
! RUN: cat %t.opt.yaml


!Test unknown format produces error
! RUN: not %flang -fsave-optimization-record=hello %s 2>&1 \
! RUN:   | FileCheck --check-prefix=CHECK-FORMAT-ERROR %s


! YAML: "-opt-record-file" "{{.+}}.opt.yaml"
! YAML: "-opt-record-format" "yaml"

! CHECK: --- !Analysis
! CHECK: Pass:            prologepilog
! CHECK: Name:            StackSize
! CHECK: Function:        _QQmain
! CHECK: Pass:            asm-printer
! CHECK: Name:            InstructionMix
! CHECK: Name:            InstructionCount

! CHECK-FORMAT-ERROR: error: unknown remark serializer format: 'hello'

program forttest
    implicit none
    integer :: n

    n = 1 * 1

end program forttest