annotate src/fftw-3.3.8/api/the-planner.c @ 169:223a55898ab9 tip default

Add null config files
author Chris Cannam <cannam@all-day-breakfast.com>
date Mon, 02 Mar 2020 14:03:47 +0000
parents bd3cc4d1df30
children
rev   line source
cannam@167 1 /*
cannam@167 2 * Copyright (c) 2003, 2007-14 Matteo Frigo
cannam@167 3 * Copyright (c) 2003, 2007-14 Massachusetts Institute of Technology
cannam@167 4 *
cannam@167 5 * This program is free software; you can redistribute it and/or modify
cannam@167 6 * it under the terms of the GNU General Public License as published by
cannam@167 7 * the Free Software Foundation; either version 2 of the License, or
cannam@167 8 * (at your option) any later version.
cannam@167 9 *
cannam@167 10 * This program is distributed in the hope that it will be useful,
cannam@167 11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
cannam@167 12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
cannam@167 13 * GNU General Public License for more details.
cannam@167 14 *
cannam@167 15 * You should have received a copy of the GNU General Public License
cannam@167 16 * along with this program; if not, write to the Free Software
cannam@167 17 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
cannam@167 18 *
cannam@167 19 */
cannam@167 20
cannam@167 21 #include "api/api.h"
cannam@167 22
cannam@167 23 static planner *plnr = 0;
cannam@167 24
cannam@167 25 /* create the planner for the rest of the API */
cannam@167 26 planner *X(the_planner)(void)
cannam@167 27 {
cannam@167 28 if (!plnr) {
cannam@167 29 plnr = X(mkplanner)();
cannam@167 30 X(configure_planner)(plnr);
cannam@167 31 }
cannam@167 32
cannam@167 33 return plnr;
cannam@167 34 }
cannam@167 35
cannam@167 36 void X(cleanup)(void)
cannam@167 37 {
cannam@167 38 if (plnr) {
cannam@167 39 X(planner_destroy)(plnr);
cannam@167 40 plnr = 0;
cannam@167 41 }
cannam@167 42 }
cannam@167 43
cannam@167 44 void X(set_timelimit)(double tlim)
cannam@167 45 {
cannam@167 46 /* PLNR is not necessarily initialized when this function is
cannam@167 47 called, so use X(the_planner)() */
cannam@167 48 X(the_planner)()->timelimit = tlim;
cannam@167 49 }