forked from OSchip/llvm-project
32 lines
1.0 KiB
Fortran
32 lines
1.0 KiB
Fortran
! Test -emit-obj (X86)
|
|
|
|
! REQUIRES: aarch64-registered-target, x86-registered-target
|
|
|
|
!-------------
|
|
! RUN COMMANDS
|
|
!-------------
|
|
! RUN: rm -f %t.o
|
|
! RUN: %flang_fc1 -emit-obj -triple aarch64-unknown-linux-gnu %s -o %t.o
|
|
! RUN: llvm-objdump --triple aarch64-unknown-linux-gnu --disassemble-all %t.o | FileCheck %s --check-prefix=CORRECT_TRIPLE
|
|
! RUN: rm -f %t.o
|
|
! RUN: %flang -c --target=aarch64-unknown-linux-gnu %s -o %t.o
|
|
! RUN: llvm-objdump --triple aarch64-unknown-linux-gnu --disassemble-all %t.o | FileCheck %s --check-prefix=CORRECT_TRIPLE
|
|
|
|
! RUN: %flang -c --target=aarch64-unknown-linux-gnu %s -o %t.o
|
|
! RUN: llvm-objdump --triple x86_64-unknown-linux-gnu --disassemble-all %t.o | FileCheck %s --check-prefix=INCORRECT_TRIPLE
|
|
|
|
!----------------
|
|
! EXPECTED OUTPUT
|
|
!----------------
|
|
! CORRECT_TRIPLE-LABEL: <_QQmain>:
|
|
! CORRECT_TRIPLE-NEXT: ret
|
|
|
|
! When incorrect triple is used to disassemble, there won't be a ret instruction at all.
|
|
! INCORRECT_TRIPLE-LABEL: <_QQmain>:
|
|
! INCORRECT_TRIPLE-NOT: ret
|
|
|
|
!------
|
|
! INPUT
|
|
!------
|
|
end program
|