diff options
| author | Pip Cet | 2024-07-04 22:09:55 +0000 |
|---|---|---|
| committer | Pip Cet | 2024-07-04 22:17:37 +0000 |
| commit | d76eb23232bffdf2505b13ec9216c6d0487a0ccb (patch) | |
| tree | 588017478bc5a8580d581f1c670c32ba1b0b5ccf /src | |
| parent | 0e591a9112c15bfe7bd19c06fa117cfc9e87f8b5 (diff) | |
| download | emacs-d76eb23232bffdf2505b13ec9216c6d0487a0ccb.tar.gz emacs-d76eb23232bffdf2505b13ec9216c6d0487a0ccb.zip | |
Fix dumping finalizers with pdumper
* src/pdumper.c (dump_finalizer): Use `out' (a pointer to a finalizer)
rather than `&out' (a pointer to a pointer to a finalizer).
Diffstat (limited to 'src')
| -rw-r--r-- | src/pdumper.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/pdumper.c b/src/pdumper.c index 138777e7134..bc5748c8c47 100644 --- a/src/pdumper.c +++ b/src/pdumper.c | |||
| @@ -2208,9 +2208,9 @@ dump_finalizer (struct dump_context *ctx, | |||
| 2208 | /* Do _not_ call dump_pseudovector_lisp_fields here: we dump the | 2208 | /* Do _not_ call dump_pseudovector_lisp_fields here: we dump the |
| 2209 | only Lisp field, finalizer->function, manually, so we can give it | 2209 | only Lisp field, finalizer->function, manually, so we can give it |
| 2210 | a low weight. */ | 2210 | a low weight. */ |
| 2211 | dump_field_lv (ctx, &out, finalizer, &finalizer->function, WEIGHT_NONE); | 2211 | dump_field_lv (ctx, out, finalizer, &finalizer->function, WEIGHT_NONE); |
| 2212 | dump_field_finalizer_ref (ctx, &out, finalizer, &finalizer->prev); | 2212 | dump_field_finalizer_ref (ctx, out, finalizer, &finalizer->prev); |
| 2213 | dump_field_finalizer_ref (ctx, &out, finalizer, &finalizer->next); | 2213 | dump_field_finalizer_ref (ctx, out, finalizer, &finalizer->next); |
| 2214 | return finish_dump_pvec (ctx, &out->header); | 2214 | return finish_dump_pvec (ctx, &out->header); |
| 2215 | } | 2215 | } |
| 2216 | 2216 | ||