scratch/igc 83d19157ab8 2/3: Fix non-MPS build

[Gerd Moellmann]

branch: scratch/igc
commit 83d19157ab8c5ba48a016923aa384ff720fcde37
Author: Gerd Möllmann <gerd@gnu.org>
Commit: Gerd Möllmann <gerd@gnu.org>

    Fix non-MPS build
---
 src/pdumper.c | 5 ++++-
 src/print.c   | 4 ++++
 2 files changed, 8 insertions(+), 1 deletion(-)

diff --git a/src/pdumper.c b/src/pdumper.c
index 48a564e7b9a..ae2ed045775 100644
--- a/src/pdumper.c
+++ b/src/pdumper.c
@@ -2788,7 +2788,9 @@ dump_object_array (struct dump_context *ctx,
   struct dump_flags old_flags = ctx->flags;
   ctx->flags.pack_objects = true;
 
+#ifdef HAVE_MPS
   dump_igc_start_obj (ctx, IGC_OBJ_OBJ_VEC, array);
+#endif
   dump_off start_offset = ctx->offset;
 
   for (size_t i = 0; i < len; i++)
@@ -2801,8 +2803,9 @@ dump_object_array (struct dump_context *ctx,
     }
 
   ctx->flags = old_flags;
+#ifdef HAVE_MPS
   dump_igc_finish_obj (ctx);
-
+#endif
   return start_offset;
 }
 
diff --git a/src/print.c b/src/print.c
index f0351b7c028..0a265d2fc4b 100644
--- a/src/print.c
+++ b/src/print.c
@@ -1334,6 +1334,7 @@ struct print_pp_stack {
 
 static struct print_pp_stack ppstack = {NULL, 0, 0};
 
+#ifdef HAVE_MPS
 static igc_scan_result_t
 scan_ppstack (struct igc_opaque *op, void *start, void *end,
              igc_scan_cell_t scan1)
@@ -1359,6 +1360,7 @@ scan_ppstack (struct igc_opaque *op, void *start, void 
*end,
     }
   return 0;
 }
+#endif
 
 NO_INLINE static void
 grow_pp_stack (void)
@@ -2262,6 +2264,7 @@ struct print_stack
 
 static struct print_stack prstack = {NULL, 0, 0};
 
+#ifdef HAVE_MPS
 static igc_scan_result_t
 scan_prstack (struct igc_opaque *op, void *start, void *end,
              igc_scan_cell_t scan1)
@@ -2296,6 +2299,7 @@ scan_prstack (struct igc_opaque *op, void *start, void 
*end,
     }
   return 0;
 }
+#endif
 
 NO_INLINE static void
 grow_print_stack (void)