// RUN: %target-sil-opt -sil-verify-all=false -enable-sil-verify-all=false -emit-sorted-sil -verify-continue-on-failure -o /dev/null %s 2>&1 | %FileCheck '--implicit-check-not=Begin Error' %s

// REQUIRES: asserts

sil_stage lowered

import Builtin

class C {}

// CHECK-LABEL: Begin Error in function alloc_pack_metadata_before_tuple
// CHECK:       SIL verification failed: Introduces instruction of kind which cannot emit on-stack pack metadata:
// CHECK-LABEL: End Error in function alloc_pack_metadata_before_tuple
sil @alloc_pack_metadata_before_tuple : $@convention(thin) () -> () {
  %marker = alloc_pack_metadata $()
  %retval = tuple ()
  dealloc_pack_metadata %marker : $*()
  return %retval : $()
}

// CHECK-LABEL: Begin Error in function dealloc_pack_metadata_with_bad_operand
// CHECK:       SIL verification failed: deallocating allocation that is not the top of the stack
// CHECK-LABEL: End Error in function dealloc_pack_metadata_with_bad_operand
// CHECK-LABEL: Begin Error in function dealloc_pack_metadata_with_bad_operand
// CHECK:       SIL verification failed: return with stack allocs that haven't been deallocated
// CHECK-LABEL: End Error in function dealloc_pack_metadata_with_bad_operand
// CHECK-LABEL: Begin Error in function dealloc_pack_metadata_with_bad_operand
// CHECK:       SIL verification failed: Must have alloc_pack_metadata operand
// CHECK-LABEL: End Error in function dealloc_pack_metadata_with_bad_operand
sil @dealloc_pack_metadata_with_bad_operand : $@convention(thin) <each T> () -> () {
  %marker = alloc_pack_metadata $()
  // To make the %marker legal.
  %out = apply undef<Pack{repeat each T}>() : $@convention(thin) <each T>() -> ()
  dealloc_pack_metadata %out : $()
  %retval = tuple ()
  return %retval : $()
}