blob: 71e37eee1b1aeb4953e4a94f4676d70463faffd2 [file] [log] [blame]
// Helper function used in Offload Fortran test
// target-use-dev-ptr.f90 to allocate data and
// check resulting addresses.
#include <assert.h>
#include <malloc.h>
#include <stdio.h>
int *get_ptr() {
int *ptr = malloc(sizeof(int));
assert(ptr && "malloc returned null");
return ptr;
}
int check_result(int *host_ptr, int *dev_ptr) {
if (dev_ptr == NULL || dev_ptr == host_ptr) {
printf("FAILURE\n");
return -1;
} else {
printf("SUCCESS\n");
return 0;
}
}
int check_equality(void *host_ptr, void *dev_ptr) {
return dev_ptr == host_ptr;
}