llvm/llvm/test/CodeGen/SystemZ/ghc-cc-04.ll

; Check that the GHC calling convention works (s390x)
; Thread local storage is not supported in GHC calling convention
;
; RUN: not --crash llc -mtriple=s390x-ibm-linux < %s 2>&1 | FileCheck %s

@x = thread_local global i32 0

define ghccc void @foo() nounwind {
entry:
  call void @bar(ptr@x)
  ret void
}

declare void @bar(ptr)

; CHECK: LLVM ERROR: In GHC calling convention TLS is not supported