diff options
Diffstat (limited to 'src/builtins/hadd.cl')
-rw-r--r-- | src/builtins/hadd.cl | 44 |
1 files changed, 44 insertions, 0 deletions
diff --git a/src/builtins/hadd.cl b/src/builtins/hadd.cl new file mode 100644 index 0000000..c96324f --- /dev/null +++ b/src/builtins/hadd.cl @@ -0,0 +1,44 @@ +/****************************************************************************** + * Copyright (c) 2011-2014, Peter Collingbourne <peter@pcc.me.uk> + * Copyright (c) 2011-2014, Texas Instruments Incorporated - http://www.ti.com/ + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions are met: + * * Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * * Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * * Neither the name of Texas Instruments Incorporated nor the + * names of its contributors may be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" + * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE + * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR + * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF + * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS + * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN + * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) + * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF + * THE POSSIBILITY OF SUCH DAMAGE. + *****************************************************************************/ +#include "clc.h" + +#define EXPAND_SIZES(type) \ + IMPLEMENTATION(_VEC_TYPE(type,2)) \ + IMPLEMENTATION(_VEC_TYPE(type,3)) \ + IMPLEMENTATION(_VEC_TYPE(type,4)) \ + IMPLEMENTATION(_VEC_TYPE(type,8)) \ + IMPLEMENTATION(_VEC_TYPE(type,16)) \ + +#define IMPLEMENTATION(gentype) \ + _CLC_OVERLOAD _CLC_DEF gentype hadd(gentype x, gentype y) \ + { return (x >> (gentype)1) + (y >> (gentype)1) + (x & y & (gentype)1); } \ + _CLC_OVERLOAD _CLC_DEF gentype rhadd(gentype x, gentype y) \ + { return (x >> (gentype)1) + (y >> (gentype)1) + ((x&(gentype)1)|(y&(gentype)1)); } \ + +_EXPAND_INTEGER_TYPES() |