remove unused properties
This commit is contained in:
		
							parent
							
								
									c3fd4addc3
								
							
						
					
					
						commit
						3418aebe3f
					
				|  | @ -110,8 +110,7 @@ typedef struct analyze_state { | |||
|   pic_sym rCONS, rCAR, rCDR, rNILP; | ||||
|   pic_sym rADD, rSUB, rMUL, rDIV; | ||||
|   pic_sym rEQ, rLT, rLE, rGT, rGE; | ||||
|   pic_sym sCALL, sTAILCALL; | ||||
|   pic_sym sDECLARE, sCLOSE, sREF; | ||||
|   pic_sym sCALL, sTAILCALL, sREF; | ||||
| } analyze_state; | ||||
| 
 | ||||
| static void push_scope(analyze_state *, pic_value); | ||||
|  | @ -159,8 +158,6 @@ new_analyze_state(pic_state *pic) | |||
| 
 | ||||
|   register_symbol(pic, state, sCALL, "call"); | ||||
|   register_symbol(pic, state, sTAILCALL, "tail-call"); | ||||
|   register_symbol(pic, state, sDECLARE, "declare"); | ||||
|   register_symbol(pic, state, sCLOSE, "close"); | ||||
|   register_symbol(pic, state, sREF, "ref"); | ||||
| 
 | ||||
|   /* push initial scope */ | ||||
|  | @ -674,7 +671,7 @@ typedef struct resolver_scope { | |||
| typedef struct resolver_state { | ||||
|   pic_state *pic; | ||||
|   resolver_scope *scope; | ||||
|   pic_sym sREF, sCLOSE; | ||||
|   pic_sym sREF; | ||||
|   pic_sym sGREF, sCREF, sLREF; | ||||
| } resolver_state; | ||||
| 
 | ||||
|  | @ -691,7 +688,6 @@ new_resolver_state(pic_state *pic) | |||
|   state->scope = NULL; | ||||
| 
 | ||||
|   register_symbol(pic, state, sREF, "ref"); | ||||
|   register_symbol(pic, state, sCLOSE, "close"); | ||||
|   register_symbol(pic, state, sGREF, "gref"); | ||||
|   register_symbol(pic, state, sLREF, "lref"); | ||||
|   register_symbol(pic, state, sCREF, "cref"); | ||||
|  |  | |||
		Loading…
	
		Reference in New Issue
	
	 Yuichi Nishiwaki
						Yuichi Nishiwaki