aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/rotatingsymmetry90.c15
1 files changed, 15 insertions, 0 deletions
diff --git a/src/rotatingsymmetry90.c b/src/rotatingsymmetry90.c
index e71c643..a923fc7 100644
--- a/src/rotatingsymmetry90.c
+++ b/src/rotatingsymmetry90.c
@@ -268,6 +268,21 @@ int BndRot90VI (cGH const * restrict const cctkGH,
(table, sizeof tensortypealias, tensortypealias, "tensortypealias");
if (ierr == UTIL_ERROR_TABLE_NO_SUCH_KEY) {
/* assume a scalar */
+ if (numvars != 1) {
+ static int * restrict didwarn = 0;
+ if (! didwarn) {
+ didwarn = calloc (CCTK_NumGroups(), sizeof *didwarn);
+ }
+ if (! didwarn[gis[var]]) {
+ didwarn[gis[var]] = 1;
+ char * groupname = CCTK_GroupName(gis[var]);
+ assert (groupname);
+ CCTK_VWarn (2, __LINE__, __FILE__, CCTK_THORNSTRING,
+ "Group \"%s\" has no tensor type and contains more than one element -- treating these as \"scalar\"",
+ groupname);
+ free (groupname);
+ }
+ }
strcpy (tensortypealias, "scalar");
} else if (ierr<0) {
char * groupname = CCTK_GroupName(gis[var]);