mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-06 14:22:31 -07:00
Code Issues Projects Releases Wiki Activity

; Avoid compilation warnings in emacs-module-tests

Browse source 
* test/src/emacs-module-resources/mod-test.c
(Fmod_test_address_to_userptr, Fmod_test_userptr_to_address):
Avoid compilation warnings when 'intmax_t' is a 64-bit type, while
pointers are 32-bit wide.
This commit is contained in:
Eli Zaretskii 2025-11-08 13:39:10 +02:00
parent 67fabb7488
commit df20ffeb78
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
test/src/emacs-module-resources/mod-test.c
View file

@ -315,14 +315,16 @@ Fmod_test_address_to_userptr (emacs_env *env, ptrdiff_t nargs,
emacs_value args[], void *data)
{
intmax_t address = env->extract_integer (env, args[0]);
return env->make_user_ptr (env, NULL, (void *) address);
assert (address <= PTRDIFF_MAX);
ptrdiff_t addr = address;
return env->make_user_ptr (env, NULL, (void *) addr);
}
static emacs_value
Fmod_test_userptr_to_address (emacs_env *env, ptrdiff_t nargs,
emacs_value args[], void *data)
{
intmax_t address = (intmax_t) env->get_user_ptr (env, args[0]);
intmax_t address = (ptrdiff_t) env->get_user_ptr (env, args[0]);
return env->make_integer (env, address);
}