зеркало из https://github.com/github/ruby.git
Add a comment.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@40143 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
Родитель
2a58706e2d
Коммит
0667aac914
25
pack.c
25
pack.c
|
@ -36,6 +36,19 @@ static const char natstr[] = "sSiIlL";
|
|||
#endif
|
||||
static const char endstr[] = "sSiIlLqQ";
|
||||
|
||||
#ifdef NATINT_PACK
|
||||
# define NATINT_LEN(type,len) (natint?(int)sizeof(type):(int)(len))
|
||||
#else
|
||||
# define NATINT_LEN(type,len) ((int)sizeof(type))
|
||||
#endif
|
||||
|
||||
#ifdef HAVE_TRUE_LONG_LONG
|
||||
/* It is intentional to use long long instead of LONG_LONG. */
|
||||
# define NATINT_LEN_Q NATINT_LEN(long long, 8)
|
||||
#else
|
||||
# define NATINT_LEN_Q 8
|
||||
#endif
|
||||
|
||||
#if SIZEOF_SHORT != 2 || SIZEOF_LONG != 4 || (defined(HAVE_TRUE_LONG_LONG) && SIZEOF_LONG_LONG != 8)
|
||||
# define NATINT_PACK
|
||||
#endif
|
||||
|
@ -62,18 +75,6 @@ static const char endstr[] = "sSiIlLqQ";
|
|||
# define BIGENDIAN_P() 0
|
||||
#endif
|
||||
|
||||
#ifdef NATINT_PACK
|
||||
# define NATINT_LEN(type,len) (natint?(int)sizeof(type):(int)(len))
|
||||
#else
|
||||
# define NATINT_LEN(type,len) ((int)sizeof(type))
|
||||
#endif
|
||||
|
||||
#ifdef HAVE_TRUE_LONG_LONG
|
||||
# define NATINT_LEN_Q NATINT_LEN(long long, 8)
|
||||
#else
|
||||
# define NATINT_LEN_Q 8
|
||||
#endif
|
||||
|
||||
#if SIZEOF_LONG == 8
|
||||
# define INT64toNUM(x) LONG2NUM(x)
|
||||
# define UINT64toNUM(x) ULONG2NUM(x)
|
||||
|
|
Загрузка…
Ссылка в новой задаче