mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-17 06:42:18 -08:00
Code Issues Projects Releases Packages Wiki Activity

Added Windows dllexport declaration to ecl_to_size and ecl_fixnum_value

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2012-01-22 23:41:38 +01:00
parent ac8b8a813a
commit 3463344b4f
1 changed files with 11 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

13
src/h/number.h
View file

@ -15,6 +15,11 @@
#ifndef ECL_NUMBER_H
#define ECL_NUMBER_H
#ifdef __cplusplus
extern "C" {
#endif
#define ECL_BIG_REGISTER_SIZE 32
#define ECL_WITH_TEMP_BIGNUM(name,n) \
@ -84,8 +89,12 @@ ecl_to_size(cl_object f)
return aux;
}
#else
cl_fixnum ecl_fixnum_value(cl_object f);
cl_index ecl_to_size(cl_object f);
extern ECL_API cl_fixnum ecl_fixnum_value(cl_object f);
extern ECL_API cl_index ecl_to_size(cl_object f);
#endif
#ifdef __cplusplus
}
#endif
#endif /* ECL_NUMBER_H */