From 5ce764af71f43b21ad94db223058d4ca5896c9fe Mon Sep 17 00:00:00 2001 From: Erik Schnetter Date: Tue, 5 Jul 2011 09:15:12 -0400 Subject: LoopControl: Make selftest conditional on a parameter Make selftest conditional on a new parameter do_selftest. Use atomic OpenMP statements in selftest. --- Carpet/LoopControl/schedule.ccl | 23 ++++++++++++++--------- 1 file changed, 14 insertions(+), 9 deletions(-) (limited to 'Carpet/LoopControl/schedule.ccl') diff --git a/Carpet/LoopControl/schedule.ccl b/Carpet/LoopControl/schedule.ccl index c8eb1233c..c1b74863a 100644 --- a/Carpet/LoopControl/schedule.ccl +++ b/Carpet/LoopControl/schedule.ccl @@ -8,16 +8,21 @@ if (check_type_sizes) { } "Check that sizes of control structures are identical in C and Fortran" } -SCHEDULE lc_selftest AT basegrid -{ - LANG: C +if (do_selftest) { STORAGE: selftest -} "Perform some self-checks" -SCHEDULE lc_selftest AT postregrid -{ - LANG: C - STORAGE: selftest -} "Perform some self-checks" + + SCHEDULE lc_selftest AT basegrid + { + LANG: C + OPTIONS: global loop-local + } "Perform some self-checks" + + SCHEDULE lc_selftest AT postregrid + { + LANG: C + OPTIONS: global loop-local + } "Perform some self-checks" +} if (printstats) { SCHEDULE lc_printstats_analysis AT analysis -- cgit v1.2.3