← Back to branch summary

~ubuntu-branches/ubuntu/trusty/python3.4/trusty-proposed

« back to all changes in this revision

Viewing changes to Modules/_ctypes/libffi/testsuite/libffi.call/cls_ulonglong.c

  • Committer: Package Import Robot
  • Author(s): Matthias Klose
  • Date: 2013-11-25 09:44:27 UTC
  • Revision ID: package-import@ubuntu.com-20131125094427-lzxj8ap5w01lmo7f
Tags: upstream-3.4~b1
Import upstream version 3.4~b1

Show diffs side-by-side

added added

removed removed

Lines of Context:
Modules/_ctypes/libffi/testsuite/libffi.call/cls_ulonglong.c
 
1
/* Area:        closure_call
 
2
   Purpose:     Check return value long long.
 
3
   Limitations: none.
 
4
   PR:          none.
 
5
   Originator:  <andreast@gcc.gnu.org> 20030828  */
 
6
 
 
7
/* { dg-do run } */
 
8
/* { dg-options "-Wno-format" { target alpha*-dec-osf* } } */
 
9
#include "ffitest.h"
 
10
 
 
11
static void cls_ret_ulonglong_fn(ffi_cif* cif __UNUSED__, void* resp,
 
12
                                 void** args, void* userdata __UNUSED__)
 
13
{
 
14
  *(unsigned long long *)resp= 0xfffffffffffffffLL ^ *(unsigned long long *)args[0];
 
15
 
 
16
  printf("%" PRIuLL ": %" PRIuLL "\n",*(unsigned long long *)args[0],
 
17
         *(unsigned long long *)(resp));
 
18
}
 
19
typedef unsigned long long (*cls_ret_ulonglong)(unsigned long long);
 
20
 
 
21
int main (void)
 
22
{
 
23
  ffi_cif cif;
 
24
  void *code;
 
25
  ffi_closure *pcl = ffi_closure_alloc(sizeof(ffi_closure), &code);
 
26
  ffi_type * cl_arg_types[2];
 
27
  unsigned long long res;
 
28
 
 
29
  cl_arg_types[0] = &ffi_type_uint64;
 
30
  cl_arg_types[1] = NULL;
 
31
 
 
32
  /* Initialize the cif */
 
33
  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 1,
 
34
                     &ffi_type_uint64, cl_arg_types) == FFI_OK);
 
35
  CHECK(ffi_prep_closure_loc(pcl, &cif, cls_ret_ulonglong_fn, NULL, code)  == FFI_OK);
 
36
  res = (*((cls_ret_ulonglong)code))(214LL);
 
37
  /* { dg-output "214: 1152921504606846761" } */
 
38
  printf("res: %" PRIdLL "\n", res);
 
39
  /* { dg-output "\nres: 1152921504606846761" } */
 
40
 
 
41
  res = (*((cls_ret_ulonglong)code))(9223372035854775808LL);
 
42
  /* { dg-output "\n9223372035854775808: 8070450533247928831" } */
 
43
  printf("res: %" PRIdLL "\n", res);
 
44
  /* { dg-output "\nres: 8070450533247928831" } */
 
45
 
 
46
  exit(0);
 
47
}