From: Andrea Corallo <akrl@sdf.org>
Date: Fri, 19 Aug 2022 08:21:38 +0000 (+0200)
Subject: * src/pdumper.c (dump_native_comp_unit): Error if CU is not fixed-up
X-Git-Tag: emacs-29.0.90~1447^2~53
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5dc274593920e36f58023f92d603824fa0b85b3f;p=emacs.git

* src/pdumper.c (dump_native_comp_unit): Error if CU is not fixed-up
---

diff --git a/src/pdumper.c b/src/pdumper.c
index 168027726c5..fb70df994a6 100644
--- a/src/pdumper.c
+++ b/src/pdumper.c
@@ -2910,6 +2910,9 @@ static dump_off
 dump_native_comp_unit (struct dump_context *ctx,
 		       struct Lisp_Native_Comp_Unit *comp_u)
 {
+  if (!CONSP (comp_u->file))
+    error ("Trying to dump non fixed-up eln file\n");
+
   /* Have function documentation always lazy loaded to optimize load-time.  */
   comp_u->data_fdoc_v = Qnil;
   START_DUMP_PVEC (ctx, &comp_u->header, struct Lisp_Native_Comp_Unit, out);