blob: 9e46bb78e30070468180fd99b2aa43b9a4a772dc [file] [log] [blame]
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <AvailabilityMacros.h> /* for MAC_OS_X_VERSION_10_* -- present on 10.2+ (according to Apple) */
/* Since macOS 10.8 vecLib requires Accelerate to be included first (which in turn includes vecLib) */
#if defined MAC_OS_X_VERSION_10_8 && MAC_OS_X_VERSION_MIN_REQUIRED >= 1040
#include <Accelerate/Accelerate.h>
#else
#include <vecLib/vecLib.h>
#endif
void FC_FUNC_(rcblas_cdotu_sub,)(const int *N, const void *X, const int *incX,
const void *Y, const int *incY, void *dotu)
{ cblas_cdotu_sub(*N, X, *incX, Y, *incY, dotu); }
void FC_FUNC_(rcblas_cdotc_sub,)(const int *N, const void *X, const int *incX,
const void *Y, const int *incY, void *dotc)
{ cblas_cdotc_sub(*N, X, *incX, Y, *incY, dotc); }
void FC_FUNC_(rcblas_zdotu_sub,)(const int *N, const void *X, const int *incX,
const void *Y, const int *incY, void *dotu)
{ cblas_zdotu_sub(*N, X, *incX, Y, *incY, dotu); }
void FC_FUNC_(rcblas_zdotc_sub,)(const int *N, const void *X, const int *incX,
const void *Y, const int *incY, void *dotc)
{ cblas_zdotc_sub(*N, X, *incX, Y, *incY, dotc); }