diff options
| author | Andrea Corallo <akrl@sdf.org> | 2020-02-29 11:05:46 +0000 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2020-03-01 19:22:27 +0000 |
| commit | 62384df2656c0a57cdc07ac5397e22fa450a7de1 (patch) | |
| tree | 0c31b42f01ecfe8473595485b03092e48ecd4bb8 /src | |
| parent | 6664f98821d46347a328337c7bcccac3f75c05e3 (diff) | |
* Reduce stack depth while marking native compiled subrs
Diffstat (limited to 'src')
| -rw-r--r-- | src/alloc.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/alloc.c b/src/alloc.c index 354c6f09cc5..9a01edca3f8 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -6683,7 +6683,9 @@ mark_object (Lisp_Object arg) { set_vector_marked (ptr); struct Lisp_Subr *subr = XSUBR (obj); - mark_object (subr->native_comp_u[0]); + obj = subr->native_comp_u[0]; + eassert (obj); + goto loop; } break; |