|  |  |  | @ -25,7 +25,8 @@ type context = | 
			
		
	
		
			
				
					|  |  |  |  |         (** If inside an objc class, contains the objc class (impl or interface) decl. *) | 
			
		
	
		
			
				
					|  |  |  |  |   ; current_objc_class: Clang_ast_t.decl option | 
			
		
	
		
			
				
					|  |  |  |  |   ; et_evaluation_node: string option | 
			
		
	
		
			
				
					|  |  |  |  |   ; if_context: if_context option } | 
			
		
	
		
			
				
					|  |  |  |  |   ; if_context: if_context option | 
			
		
	
		
			
				
					|  |  |  |  |   ; in_for_loop_declaration: bool } | 
			
		
	
		
			
				
					|  |  |  |  | 
 | 
			
		
	
		
			
				
					|  |  |  |  | let empty translation_unit_context = | 
			
		
	
		
			
				
					|  |  |  |  |   { current_method= None | 
			
		
	
	
		
			
				
					|  |  |  | @ -35,7 +36,8 @@ let empty translation_unit_context = | 
			
		
	
		
			
				
					|  |  |  |  |   ; is_ck_translation_unit= false | 
			
		
	
		
			
				
					|  |  |  |  |   ; current_objc_class= None | 
			
		
	
		
			
				
					|  |  |  |  |   ; et_evaluation_node= None | 
			
		
	
		
			
				
					|  |  |  |  |   ; if_context= None } | 
			
		
	
		
			
				
					|  |  |  |  |   ; if_context= None | 
			
		
	
		
			
				
					|  |  |  |  |   ; in_for_loop_declaration= false } | 
			
		
	
		
			
				
					|  |  |  |  | 
 | 
			
		
	
		
			
				
					|  |  |  |  | let add_parent_method decl_opt parent_methods = | 
			
		
	
		
			
				
					|  |  |  |  |   match decl_opt with Some decl -> decl :: parent_methods | None -> parent_methods | 
			
		
	
	
		
			
				
					|  |  |  | 
 |