Fix displaying content of entities with default value defined, like p…

…rintf does
mingodad · Aug 6, 2020 · e54d6bb · e54d6bb
1 parent dfb9f1d
commit e54d6bb
Showing 1 changed file with 8 additions and 4 deletions.
diff --git a/src/mpl/mpl3.c b/src/mpl/mpl3.c
@@ -5807,8 +5807,10 @@ static int display_func(MPL *mpl, void *info)
                   eval_member_set(mpl, set, set->array->head->tuple);
             }
             /* display all members of the set array */
-            if (set->array->head == NULL)
-               write_text(mpl, "%s has empty content\n", set->name);
+            if (set->array->head == NULL) {
+               if (set->option != NULL) eval_whole_set(mpl, set);
+               else write_text(mpl, "%s has empty content\n", set->name);
+            }
             for (memb = set->array->head; memb != NULL; memb =
                memb->next) display_set(mpl, set, memb);
          }
@@ -5834,8 +5836,10 @@ static int display_func(MPL *mpl, void *info)
                }
             }
             /* display all members of the parameter array */
-            if (par->array->head == NULL)
-               write_text(mpl, "%s has empty content\n", par->name);
+            if (par->array->head == NULL) {
+               if (par->option != NULL) eval_whole_par(mpl, par);
+               else write_text(mpl, "%s has empty content\n", par->name);
+            }
             for (memb = par->array->head; memb != NULL; memb =
                memb->next) display_par(mpl, par, memb);
          }