branch: externals/jinx commit b09efcb85b1a8db8054a3d5a298e8d9516836f16 Author: Daniel Mendler <m...@daniel-mendler.de> Commit: Daniel Mendler <m...@daniel-mendler.de>
jinx-mod: Add global ref Qcons --- jinx-mod.c | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/jinx-mod.c b/jinx-mod.c index ee534cd522..0e6a4e66f4 100644 --- a/jinx-mod.c +++ b/jinx-mod.c @@ -27,7 +27,7 @@ along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>. */ int plugin_is_GPL_compatible; static EnchantBroker* broker = 0; -static emacs_value Qt, Qnil; +static emacs_value Qt, Qnil, Qcons; static EnchantBroker* jinx_broker(void) { return broker ? broker : (broker = enchant_broker_init()); @@ -42,7 +42,7 @@ static emacs_value jinx_str(emacs_env* env, const char* str) { } static emacs_value jinx_cons(emacs_env* env, emacs_value a, emacs_value b) { - return env->funcall(env, env->intern(env, "cons"), 2, (emacs_value[]){a, b}); + return env->funcall(env, Qcons, 2, (emacs_value[]){a, b}); } static char* jinx_cstr(emacs_env* env, emacs_value val) { @@ -186,6 +186,7 @@ int emacs_module_init(struct emacs_runtime *runtime) { }); Qt = env->make_global_ref(env, env->intern(env, "t")); Qnil = env->make_global_ref(env, env->intern(env, "nil")); + Qcons = env->make_global_ref(env, env->intern(env, "cons")); jinx_defun(env, "jinx--mod-suggest", 2, 2, jinx_suggest); jinx_defun(env, "jinx--mod-check", 2, 2, jinx_check); jinx_defun(env, "jinx--mod-add", 2, 2, jinx_add);