annotate fft/fftw/fftw-3.3.4/simd-support/neon.c @ 40:223f770b5341 kissfft-double tip

Try a double-precision kissfft
author Chris Cannam
date Wed, 07 Sep 2016 10:40:32 +0100
parents 26056e866c29
children
rev   line source
Chris@19 1 /*
Chris@19 2 * Copyright (c) 2003, 2007-14 Matteo Frigo
Chris@19 3 * Copyright (c) 2003, 2007-14 Massachusetts Institute of Technology
Chris@19 4 *
Chris@19 5 * This program is free software; you can redistribute it and/or modify
Chris@19 6 * it under the terms of the GNU General Public License as published by
Chris@19 7 * the Free Software Foundation; either version 2 of the License, or
Chris@19 8 * (at your option) any later version.
Chris@19 9 *
Chris@19 10 * This program is distributed in the hope that it will be useful,
Chris@19 11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
Chris@19 12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
Chris@19 13 * GNU General Public License for more details.
Chris@19 14 *
Chris@19 15 * You should have received a copy of the GNU General Public License
Chris@19 16 * along with this program; if not, write to the Free Software
Chris@19 17 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
Chris@19 18 *
Chris@19 19 */
Chris@19 20
Chris@19 21
Chris@19 22 #include "ifftw.h"
Chris@19 23
Chris@19 24 #if HAVE_NEON
Chris@19 25
Chris@19 26 /* check for an environment where signals are known to work */
Chris@19 27 #if defined(unix) || defined(linux)
Chris@19 28 # include <signal.h>
Chris@19 29 # include <setjmp.h>
Chris@19 30
Chris@19 31 static jmp_buf jb;
Chris@19 32
Chris@19 33 static void sighandler(int x)
Chris@19 34 {
Chris@19 35 UNUSED(x);
Chris@19 36 longjmp(jb, 1);
Chris@19 37 }
Chris@19 38
Chris@19 39 static int really_have_neon(void)
Chris@19 40 {
Chris@19 41 void (*oldsig)(int);
Chris@19 42 oldsig = signal(SIGILL, sighandler);
Chris@19 43 if (setjmp(jb)) {
Chris@19 44 signal(SIGILL, oldsig);
Chris@19 45 return 0;
Chris@19 46 } else {
Chris@19 47 /* paranoia: encode the instruction in binary because the
Chris@19 48 assembler may not recognize it without -mfpu=neon */
Chris@19 49 /*asm volatile ("vand q0, q0, q0");*/
Chris@19 50 asm volatile (".long 0xf2000150");
Chris@19 51 signal(SIGILL, oldsig);
Chris@19 52 return 1;
Chris@19 53 }
Chris@19 54 }
Chris@19 55
Chris@19 56 extern void X(check_alignment_of_sse2_pm)(void);
Chris@19 57
Chris@19 58 int X(have_simd_neon)(void)
Chris@19 59 {
Chris@19 60 static int init = 0, res;
Chris@19 61
Chris@19 62 if (!init) {
Chris@19 63 res = really_have_neon();
Chris@19 64 init = 1;
Chris@19 65 }
Chris@19 66 return res;
Chris@19 67 }
Chris@19 68
Chris@19 69
Chris@19 70 #else
Chris@19 71 /* don't know how to autodetect NEON; assume it is present */
Chris@19 72 int X(have_simd_neon)(void)
Chris@19 73 {
Chris@19 74 return 1;
Chris@19 75 }
Chris@19 76 #endif
Chris@19 77
Chris@19 78 #endif