mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-07-09 19:00:27 +02:00
Use scm_t_ptrdiff consistently instead of ptrdiff_t
This fixes the following errors in a MinGW cross-build. libtool: compile: i586-mingw32msvc-gcc -DHAVE_CONFIG_H -I.. -I.. -I.. -I/usr/local/i586-mingw32msvc/include -I/usr/local/i586-mingw32msvc/include -g -O2 -Wall -Wmissing-prototypes -Werror -MT libguile_la-discouraged.lo -MD -MP -MF .deps/libguile_la-discouraged.Tpo -c discouraged.c -DDLL_EXPORT -DPIC -o .libs/libguile_la-discouraged.o discouraged.c:75: error: conflicting types for 'scm_ptrdiff2num' ../libguile/discouraged.h:75: error: previous declaration of 'scm_ptrdiff2num' was here discouraged.c:123: error: conflicting types for 'scm_num2ptrdiff' ../libguile/discouraged.h:89: error: previous declaration of 'scm_num2ptrdiff' was here * libguile/discouraged.c (scm_ptrdiff2num, scm_num2ptrdiff): Use scm_t_ptrdiff instead of ptrdiff_t.
This commit is contained in:
parent
a52d8d6fea
commit
bf49096fff
1 changed files with 2 additions and 2 deletions
|
@ -71,7 +71,7 @@ scm_size2num (size_t x)
|
|||
}
|
||||
|
||||
SCM
|
||||
scm_ptrdiff2num (ptrdiff_t x)
|
||||
scm_ptrdiff2num (scm_t_ptrdiff x)
|
||||
{
|
||||
return scm_from_ssize_t (x);
|
||||
}
|
||||
|
@ -118,7 +118,7 @@ scm_num2size (SCM x, unsigned long pos, const char *s_caller)
|
|||
return scm_to_size_t (x);
|
||||
}
|
||||
|
||||
ptrdiff_t
|
||||
scm_t_ptrdiff
|
||||
scm_num2ptrdiff (SCM x, unsigned long pos, const char *s_caller)
|
||||
{
|
||||
return scm_to_ssize_t (x);
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue