summaryrefslogtreecommitdiff
path: root/test/src/emacs-module-resources/mod-test.c
diff options
context:
space:
mode:
Diffstat (limited to 'test/src/emacs-module-resources/mod-test.c')
-rw-r--r--test/src/emacs-module-resources/mod-test.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/test/src/emacs-module-resources/mod-test.c b/test/src/emacs-module-resources/mod-test.c
index 419621256ae..f855e9b6da0 100644
--- a/test/src/emacs-module-resources/mod-test.c
+++ b/test/src/emacs-module-resources/mod-test.c
@@ -806,6 +806,12 @@ emacs_module_init (struct emacs_runtime *ert)
strlen (interactive_spec)));
bind_function (env, "mod-test-identity", identity_fn);
+ /* We allocate lots of values to trigger bugs in the frame allocator during
+ initialization. */
+ int count = 10000; /* larger than value_frame_size in emacs-module.c */
+ for (int i = 0; i < count; ++i)
+ env->make_integer (env, i);
+
provide (env, "mod-test");
return 0;
}