Permalink
Cannot retrieve contributors at this time
Join GitHub today
GitHub is home to over 50 million developers working together to host and review code, manage projects, and build software together.
Sign upGitHub is where the world builds software
Millions of developers and companies build, ship, and maintain their software on GitHub — the largest and most advanced development platform in the world.
| #ifndef RUBY_SYMBOL_H | |
| #define RUBY_SYMBOL_H 1 | |
| /********************************************************************** | |
| symbol.h - | |
| $Author$ | |
| created at: Tue Jul 8 15:49:54 JST 2014 | |
| Copyright (C) 2014 Yukihiro Matsumoto | |
| **********************************************************************/ | |
| #include "id.h" | |
| #include "ruby/encoding.h" | |
| #define DYNAMIC_ID_P(id) (!(id&ID_STATIC_SYM)&&id>tLAST_OP_ID) | |
| #define STATIC_ID2SYM(id) (((VALUE)(id)<<RUBY_SPECIAL_SHIFT)|SYMBOL_FLAG) | |
| #ifdef HAVE_BUILTIN___BUILTIN_CONSTANT_P | |
| #define rb_id2sym(id) \ | |
| RB_GNUC_EXTENSION_BLOCK(__builtin_constant_p(id) && !DYNAMIC_ID_P(id) ? \ | |
| STATIC_ID2SYM(id) : rb_id2sym(id)) | |
| #endif | |
| struct RSymbol { | |
| struct RBasic basic; | |
| st_index_t hashval; | |
| VALUE fstr; | |
| ID id; | |
| }; | |
| #define RSYMBOL(obj) ((struct RSymbol *)(obj)) | |
| #define is_notop_id(id) ((id)>tLAST_OP_ID) | |
| #define is_local_id(id) (id_type(id)==ID_LOCAL) | |
| #define is_global_id(id) (id_type(id)==ID_GLOBAL) | |
| #define is_instance_id(id) (id_type(id)==ID_INSTANCE) | |
| #define is_attrset_id(id) ((id)==idASET||id_type(id)==ID_ATTRSET) | |
| #define is_const_id(id) (id_type(id)==ID_CONST) | |
| #define is_class_id(id) (id_type(id)==ID_CLASS) | |
| #define is_junk_id(id) (id_type(id)==ID_JUNK) | |
| static inline int | |
| id_type(ID id) | |
| { | |
| if (is_notop_id(id)) { | |
| return (int)(id&ID_SCOPE_MASK); | |
| } | |
| else { | |
| return -1; | |
| } | |
| } | |
| typedef uint32_t rb_id_serial_t; | |
| static const uint32_t RB_ID_SERIAL_MAX = /* 256M on LP32 */ | |
| UINT32_MAX >> | |
| ((sizeof(ID)-sizeof(rb_id_serial_t))*CHAR_BIT < RUBY_ID_SCOPE_SHIFT ? | |
| RUBY_ID_SCOPE_SHIFT : 0); | |
| typedef struct { | |
| rb_id_serial_t last_id; | |
| st_table *str_sym; | |
| VALUE ids; | |
| VALUE dsymbol_fstr_hash; | |
| } rb_symbols_t; | |
| static inline rb_id_serial_t | |
| rb_id_to_serial(ID id) | |
| { | |
| if (is_notop_id(id)) { | |
| return (rb_id_serial_t)(id >> ID_SCOPE_SHIFT); | |
| } | |
| else { | |
| return (rb_id_serial_t)id; | |
| } | |
| } | |
| static inline int | |
| sym_type(VALUE sym) | |
| { | |
| ID id; | |
| if (STATIC_SYM_P(sym)) { | |
| id = RSHIFT(sym, RUBY_SPECIAL_SHIFT); | |
| if (id<=tLAST_OP_ID) { | |
| return -1; | |
| } | |
| } | |
| else { | |
| id = RSYMBOL(sym)->id; | |
| } | |
| return (int)(id&ID_SCOPE_MASK); | |
| } | |
| #define is_local_sym(sym) (sym_type(sym)==ID_LOCAL) | |
| #define is_global_sym(sym) (sym_type(sym)==ID_GLOBAL) | |
| #define is_instance_sym(sym) (sym_type(sym)==ID_INSTANCE) | |
| #define is_attrset_sym(sym) (sym_type(sym)==ID_ATTRSET) | |
| #define is_const_sym(sym) (sym_type(sym)==ID_CONST) | |
| #define is_class_sym(sym) (sym_type(sym)==ID_CLASS) | |
| #define is_junk_sym(sym) (sym_type(sym)==ID_JUNK) | |
| RUBY_FUNC_EXPORTED const unsigned int ruby_global_name_punct_bits[(0x7e - 0x20 + 31) / 32]; | |
| static inline int | |
| is_global_name_punct(const int c) | |
| { | |
| if (c <= 0x20 || 0x7e < c) return 0; | |
| return (ruby_global_name_punct_bits[(c - 0x20) / 32] >> (c % 32)) & 1; | |
| } | |
| int rb_enc_symname_type(const char *name, long len, rb_encoding *enc, unsigned int allowed_attrset); | |
| RUBY_SYMBOL_EXPORT_BEGIN | |
| size_t rb_sym_immortal_count(void); | |
| RUBY_SYMBOL_EXPORT_END | |
| #endif |