os/ossrv/genericopenlibs/liboil/src/ref/sum_f64_ref.c
author sl
Tue, 10 Jun 2014 14:32:02 +0200
changeset 1 260cb5ec6c19
permissions -rw-r--r--
Update contrib.
     1 /*
     2  * LIBOIL - Library of Optimized Inner Loops
     3  * Copyright (c) 2003,2004 David A. Schleef <ds@schleef.org>
     4  * All rights reserved.
     5  *
     6  * Redistribution and use in source and binary forms, with or without
     7  * modification, are permitted provided that the following conditions
     8  * are met:
     9  * 1. Redistributions of source code must retain the above copyright
    10  *    notice, this list of conditions and the following disclaimer.
    11  * 2. Redistributions in binary form must reproduce the above copyright
    12  *    notice, this list of conditions and the following disclaimer in the
    13  *    documentation and/or other materials provided with the distribution.
    14  * 
    15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
    16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
    17  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
    18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
    19  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
    20  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
    21  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
    22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
    23  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
    24  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
    25  * POSSIBILITY OF SUCH DAMAGE.
    26  */
    27 //Portions Copyright (c)  2008-2009 Nokia Corporation and/or its subsidiary(-ies). All rights reserved. 
    28 
    29 #ifdef HAVE_CONFIG_H
    30 #include "config.h"
    31 #endif
    32 
    33 #include <liboil/liboilfunction.h>
    34 #include "liboil/simdpack/simdpack.h"
    35 #include <math.h>
    36 
    37 /**
    38  * oil_sum_f64:
    39  * @d_1: destination
    40  * @s: source array
    41  * @sstr: stride of source elements
    42  * @n: number of elements
    43  *
    44  * Sums the elements in the source array and places the result in
    45  * @d.
    46  */
    47 OIL_DEFINE_CLASS (sum_f64, "double *d_1, double *s, int sstr, int n");
    48 //OIL_DEFINE_CLASS (sum_f64_i10, "double *dest, double *src, int sstr, int n");
    49 
    50 static void
    51 sum_f64_ref (double *dest, double *src, int sstr, int n)
    52 {
    53 	double sum = 0;
    54 	double errsum = 0;
    55 	double tmp;
    56 	int i;
    57 
    58 	for(i=0;i<n;i++){
    59 		tmp = sum;
    60 		sum += OIL_GET(src, sstr*i, double);
    61 		errsum += (tmp - sum) + OIL_GET(src, sstr*i, double);
    62 	}
    63 
    64 	*dest = sum + errsum;
    65 }
    66 OIL_DEFINE_IMPL_REF (sum_f64_ref, sum_f64);
    67 
    68 
    69 
    70 
    71 #ifdef	__SYMBIAN32__
    72  
    73 OilFunctionClass* __oil_function_class_sum_f64() {
    74 		return &_oil_function_class_sum_f64;
    75 }
    76 #endif
    77 
    78 #if 0
    79 #ifdef	__SYMBIAN32__
    80  
    81 OilFunctionClass* __oil_function_class_sum_f64_i10() {
    82 		return &_oil_function_class_sum_f64_i10;
    83 }
    84 #endif
    85 #endif
    86 
    87 
    88 #ifdef	__SYMBIAN32__
    89  
    90 OilFunctionImpl* __oil_function_impl_sum_f64_ref() {
    91 		return &_oil_function_impl_sum_f64_ref;
    92 }
    93 #endif
    94 
    95 
    96 
    97 #ifdef	__SYMBIAN32__
    98  
    99 EXPORT_C void** _oil_function_class_ptr_sum_f64 ()	{
   100 	oil_function_class_ptr_sum_f64 = __oil_function_class_sum_f64();
   101 	return &oil_function_class_ptr_sum_f64->func;
   102 	}
   103 #endif
   104 
   105 #if 0
   106 #ifdef	__SYMBIAN32__
   107  
   108 EXPORT_C void** _oil_function_class_ptr_sum_f64_i10 ()	{
   109 	oil_function_class_ptr_sum_f64_i10 = __oil_function_class_sum_f64_i10();
   110 	return &oil_function_class_ptr_sum_f64_i10->func;
   111 	}
   112 #endif
   113 #endif