Back to index

plt-scheme  4.2.1
schcpt.h
Go to the documentation of this file.
00001 
00002 enum {
00003   CPT_ESCAPE, /* 0 */
00004   CPT_SYMBOL,
00005   CPT_SYMREF,
00006   CPT_WEIRD_SYMBOL,
00007   CPT_KEYWORD,
00008   CPT_BYTE_STRING,
00009   CPT_CHAR_STRING,
00010   CPT_CHAR,
00011   CPT_INT,
00012   CPT_NULL,
00013   CPT_TRUE, /* 10 */
00014   CPT_FALSE,
00015   CPT_VOID,
00016   CPT_BOX,
00017   CPT_PAIR,
00018   CPT_LIST,
00019   CPT_VECTOR,
00020   CPT_HASH_TABLE,
00021   CPT_STX,
00022   CPT_GSTX,
00023   CPT_MARSHALLED, /* 20 */
00024   CPT_QUOTE,
00025   CPT_REFERENCE,
00026   CPT_LOCAL,
00027   CPT_LOCAL_UNBOX,
00028   CPT_SVECTOR,
00029   CPT_APPLICATION,
00030   CPT_LET_ONE,
00031   CPT_BRANCH,
00032   CPT_MODULE_INDEX,
00033   CPT_MODULE_VAR, /* 30 */
00034   CPT_PATH,
00035   CPT_CLOSURE,
00036   CPT_DELAY_REF,
00037   CPT_PREFAB,
00038   _CPT_COUNT_
00039 };
00040 
00041 #define CPT_SMALL_NUMBER_START 35
00042 #define CPT_SMALL_NUMBER_END   60
00043 
00044 #define CPT_SMALL_SYMBOL_START 60
00045 #define CPT_SMALL_SYMBOL_END   80
00046 
00047 #define CPT_SMALL_MARSHALLED_START 80
00048 #define CPT_SMALL_MARSHALLED_END 92
00049 
00050 #define _SMALL_LIST_MAX_ 65
00051 
00052 #define CPT_SMALL_PROPER_LIST_START 92
00053 #define CPT_SMALL_PROPER_LIST_END  (CPT_SMALL_PROPER_LIST_START + _SMALL_LIST_MAX_) 
00054 
00055 #define CPT_SMALL_LIST_START CPT_SMALL_PROPER_LIST_END
00056 #define CPT_SMALL_LIST_END   (CPT_SMALL_LIST_START + _SMALL_LIST_MAX_)
00057 
00058 #define CPT_SMALL_LOCAL_START 192
00059 #define CPT_SMALL_LOCAL_END 207
00060 #define CPT_SMALL_LOCAL_UNBOX_START 207
00061 #define CPT_SMALL_LOCAL_UNBOX_END 222
00062 
00063 #define CPT_SMALL_SVECTOR_START 222
00064 #define CPT_SMALL_SVECTOR_END 247
00065 
00066 #define CPT_SMALL_APPLICATION_START 247
00067 #define CPT_SMALL_APPLICATION_END 255
00068 #define CPT_SMALL_APPLICATION2 248
00069 #define CPT_SMALL_APPLICATION3 249
00070 
00071 #define CPT_BETWEEN(x, s) ((x >= CPT_ ## s ## _START) && (x < CPT_ ## s ## _END))
00072 #define CPT_RANGE(s) (CPT_ ## s ## _END - CPT_ ## s ## _START)