ruby/template/limits.c.tmpl

98 строки
2.4 KiB
C

%# -*- c -*-
% limits = %w[
% FIXNUM
% CHAR SCHAR UCHAR WCHAR
% SHRT USHRT
% INT UINT
% LONG ULONG
% LLONG ULLONG
% INT8 UINT8 INT_LEAST8 UINT_LEAST8 INT_FAST8 UINT_FAST8
% INT16 UINT16 INT_LEAST16 UINT_LEAST16 INT_FAST16 UINT_FAST16
% INT32 UINT32 INT_LEAST32 UINT_LEAST32 INT_FAST32 UINT_FAST32
% INT64 UINT64 INT_LEAST64 UINT_LEAST64 INT_FAST64 UINT_FAST64
% INT128 UINT128
% INTMAX UINTMAX
% INTPTR UINTPTR
% SSZIE SIZE
% PTRDIFF
% ]
%
% verbatim_integers = %w[
% FLT_RADIX
% FLT_ROUNDS
% FLT_EVAL_METHOD
% FLT_MANT_DIG DBL_MANT_DIG LDBL_MANT_DIG
% FLT_DIG DBL_DIG LDBL_DIG
% FLT_MIN_EXP DBL_MIN_EXP LDBL_MIN_EXP
% FLT_MIN_10_EXP DBL_MIN_10_EXP LDBL_MIN_10_EXP
% FLT_MAX_EXP DBL_MAX_EXP LDBL_MAX_EXP
% FLT_MAX_10_EXP DBL_MAX_10_EXP LDBL_MAX_10_EXP
% FLT_DECIMAL_DIG DBL_DECIMAL_DIG LDBL_DECIMAL_DIG DECIMAL_DIG
% FLT_HAS_SUBNORM DBL_HAS_SUBNORM LDBL_HAS_SUBNORM
% ]
%
% # Beware; Ruby cannot handle LDBL_MAX.
% verbatim_doubles = %w[
% FLT_MAX DBL_MAX
% FLT_EPSILON DBL_EPSILON
% FLT_MIN DBL_MIN
% FLT_TRUE_MIN DBL_TRUE_MIN
% ]
%
#include <limits.h>
#include "ruby/ruby.h"
#ifdef HAVE_STDINT_H
# include <stdint.h>
#endif
#ifdef HAVE_INTTYPES_H
# include <stdint.h>
#endif
#ifdef HAVE_FLOAT_H
# include <float.h>
#endif
void
Init_limits(void)
{
VALUE h = rb_hash_new();
rb_define_const(rb_define_module("RbConfig"), "LIMITS", h);
#ifdef HAVE_LONG_LONG
#ifndef ULLONG_MAX
#define ULLONG_MAX ((unsigned LONG_LONG)LLONG_MAX*2+1)
#endif
#define MAX2NUM(name) ULL2NUM(name ## _MAX)
#define MIN2NUM(name) LL2NUM(name ## _MIN)
#else
#define MAX2NUM(name) ULONG2NUM(name ## _MAX)
#define MIN2NUM(name) LONG2NUM(name ## _MIN)
#endif
#define DEFINE(k, v) rb_hash_aset(h, rb_str_new_cstr(#k), v)
% limits.each do |type|
#ifdef <%= type %>_MAX
DEFINE(<%= type %>_MAX, MAX2NUM(<%= type %>));
#endif
#ifdef <%= type %>_MIN
DEFINE(<%= type %>_MIN, MIN2NUM(<%= type %>));
#endif
% end
% verbatim_integers.each do |name|
#ifdef <%= name %>
DEFINE(<%= name %>, LONG2NUM(<%= name %>));
#endif
% end
% verbatim_doubles.each do |name|
#ifdef <%= name %>
DEFINE(<%= name %>, DBL2NUM(<%= name %>));
#endif
% end
#undef DEFINE
#undef MIN2NUM
#undef MAX2NUM
OBJ_FREEZE(h);
}