sc/source/core/opencl/formulagroupcl_public.hxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  */
   9
  10 #ifndef SC_OPENCL_FORMULAGROUPCL_PUBLIC_HXX
  11 #define SC_OPENCL_FORMULAGROUPCL_PUBLIC_HXX
  12
  13 const char* publicFunc =
  14  "int isNan(double a) { return isnan(a); }\n"
  15  "double fsum_count(double a, double b, __private int *p) {\n"
  16  "    bool t = isNan(a);\n"
  17  "    (*p) += t?0:1;\n"
  18  "    return t?b:a+b;\n"
  19  "}\n"
  20  "double fsum(double a, double b) { return isNan(a)?b:a+b; }\n"
  21  "double legalize(double a, double b) { return isNan(a)?b:a;}\n"
  22  "double fsub(double a, double b) { return a-b; }\n"
  23  "double fdiv(double a, double b) { return a/b; }\n"
  24  "double strequal(unsigned a, unsigned b) { return (a==b)?1.0:0; }\n"
  25 #ifdef USE_FMIN_FMAX
  26  "double mcw_fmin(double a, double b) { return fmin(a, b); }\n"
  27  "double mcw_fmax(double a, double b) { return fmax(a, b); }\n"
  28 #else
  29  "double mcw_fmin(double a, double b) { return a>b?b:a; }\n"
  30  "double mcw_fmax(double a, double b) { return a>b?a:b; }\n"
  31 #endif
  32
  33  ;
  34
  35 #endif
  36
  37 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */