From 5dc274593920e36f58023f92d603824fa0b85b3f Mon Sep 17 00:00:00 2001 From: Andrea Corallo Date: Fri, 19 Aug 2022 10:21:38 +0200 Subject: [PATCH] * src/pdumper.c (dump_native_comp_unit): Error if CU is not fixed-up --- src/pdumper.c | 3 +++ 1 file changed, 3 insertions(+) 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); -- 2.39.2