… | |
… | |
66 | uint8_t *svalue; |
66 | uint8_t *svalue; |
67 | uint32_t length; |
67 | uint32_t length; |
68 | } string; |
68 | } string; |
69 | |
69 | |
70 | struct { |
70 | struct { |
71 | struct cell **vvalue; |
71 | pointer *vvalue; |
72 | uint32_t length; |
72 | uint32_t length; |
73 | } vector; |
73 | } vector; |
74 | |
74 | |
75 | intptr_t ivalue; |
75 | intptr_t ivalue; |
76 | #if USE_REAL |
76 | #if USE_REAL |
… | |
… | |
115 | #endif |
115 | #endif |
116 | #ifndef CELL_NSEGMENT |
116 | #ifndef CELL_NSEGMENT |
117 | # define CELL_NSEGMENT 20 /* # of segments for cells */ |
117 | # define CELL_NSEGMENT 20 /* # of segments for cells */ |
118 | #endif |
118 | #endif |
119 | char *alloc_seg[CELL_NSEGMENT]; |
119 | char *alloc_seg[CELL_NSEGMENT]; |
120 | pointer cell_seg[CELL_NSEGMENT]; |
120 | struct cell *cell_seg[CELL_NSEGMENT]; |
121 | int cell_segsize[CELL_NSEGMENT]; |
121 | int cell_segsize[CELL_NSEGMENT]; |
122 | int last_cell_seg; |
122 | int last_cell_seg; |
123 | |
123 | |
124 | int interactive_repl; /* are we in an interactive REPL? */ |
124 | int interactive_repl; /* are we in an interactive REPL? */ |
125 | |
125 | |