aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/data.c2
-rw-r--r--src/pdumper.c4
2 files changed, 5 insertions, 1 deletions
diff --git a/src/data.c b/src/data.c
index 1435cb03779..fea39867c99 100644
--- a/src/data.c
+++ b/src/data.c
@@ -4055,8 +4055,8 @@ syms_of_data (void)
4055 defsubr (&Ssubr_arity); 4055 defsubr (&Ssubr_arity);
4056 defsubr (&Ssubr_name); 4056 defsubr (&Ssubr_name);
4057 defsubr (&Ssubr_native_elisp_p); 4057 defsubr (&Ssubr_native_elisp_p);
4058#ifdef HAVE_NATIVE_COMP
4059 defsubr (&Ssubr_native_lambda_list); 4058 defsubr (&Ssubr_native_lambda_list);
4059#ifdef HAVE_NATIVE_COMP
4060 defsubr (&Ssubr_native_comp_unit); 4060 defsubr (&Ssubr_native_comp_unit);
4061 defsubr (&Snative_comp_unit_file); 4061 defsubr (&Snative_comp_unit_file);
4062 defsubr (&Snative_comp_unit_set_file); 4062 defsubr (&Snative_comp_unit_set_file);
diff --git a/src/pdumper.c b/src/pdumper.c
index 1a7aee6343a..b3abbd66f0c 100644
--- a/src/pdumper.c
+++ b/src/pdumper.c
@@ -3405,6 +3405,7 @@ dump_cold_bignum (struct dump_context *ctx, Lisp_Object object)
3405 } 3405 }
3406} 3406}
3407 3407
3408#ifdef HAVE_NATIVE_COMP
3408static void 3409static void
3409dump_cold_native_subr (struct dump_context *ctx, Lisp_Object subr) 3410dump_cold_native_subr (struct dump_context *ctx, Lisp_Object subr)
3410{ 3411{
@@ -3425,6 +3426,7 @@ dump_cold_native_subr (struct dump_context *ctx, Lisp_Object subr)
3425 const char *c_name = XSUBR (subr)->native_c_name[0]; 3426 const char *c_name = XSUBR (subr)->native_c_name[0];
3426 dump_write (ctx, c_name, 1 + strlen (c_name)); 3427 dump_write (ctx, c_name, 1 + strlen (c_name));
3427} 3428}
3429#endif
3428 3430
3429static void 3431static void
3430dump_drain_cold_data (struct dump_context *ctx) 3432dump_drain_cold_data (struct dump_context *ctx)
@@ -3469,9 +3471,11 @@ dump_drain_cold_data (struct dump_context *ctx)
3469 case COLD_OP_BIGNUM: 3471 case COLD_OP_BIGNUM:
3470 dump_cold_bignum (ctx, data); 3472 dump_cold_bignum (ctx, data);
3471 break; 3473 break;
3474#ifdef HAVE_NATIVE_COMP
3472 case COLD_OP_NATIVE_SUBR: 3475 case COLD_OP_NATIVE_SUBR:
3473 dump_cold_native_subr (ctx, data); 3476 dump_cold_native_subr (ctx, data);
3474 break; 3477 break;
3478#endif
3475 default: 3479 default:
3476 emacs_abort (); 3480 emacs_abort ();
3477 } 3481 }