Remove old function debug information generation code.

Author: Pascal Beyer

src/coff_writer.c

@@ -821,167 +821,6 @@ func b32 global_symbol_stream_hash_table_add(struct gsi_hash_bucket **hash_table
 
 //_____________________________________________________________________________________________________________________
 
-func void tpi_emit_type_index_or_predecl_type_index(struct pdb_write_context *context, struct ast_type *type, enum ast_kind *defined_type){
-    if(defined_type && *defined_type == AST_enum){
-        struct ast_type *ast_enum = cast(struct ast_type *)defined_type;
-        if(ast_enum->flags & TYPE_FLAG_pdb_permanent){
-            out_int(ast_enum->pdb_type_index, u32);
-            return;
-        }
-    }
-    
-    if(type->flags & TYPE_FLAG_pdb_permanent){
-        out_int(type->pdb_type_index, u32);
-    }else{
-        assert(type->pdb_predecl_type_index);
-        out_int(type->pdb_predecl_type_index, u32);
-    }
-}
-
-
-func void pdb_emit_regrels_for_scope(struct pdb_write_context *context, struct ast_scope *scope){
-    // @note: it seems, that all declarations need to be at the beginning of the scope.
-    //        so we loop here over all of them instead of doing it recursively
-    for(smm i = 0; i < scope->current_max_amount_of_declarations; i++){
-        struct ast_declaration *decl = scope->declarations[i];
-        if(!decl) continue;
-        
-        // Skip typedefs.
-        if(decl->kind != IR_declaration) continue;
-        
-        // Enums don't get 'S_REGREL32'... @cleanup: maybe they get constants?
-        if((decl->flags & DECLARATION_FLAGS_is_enum_member)) continue;
-        
-        if(decl->flags & DECLARATION_FLAGS_is_local_persist){
-            // @incomplete: emit a LDATA32
-            continue;
-        }
-        s32 offset_of_rbp = to_s32(-decl->offset_on_stack);
-        
-        begin_symbol(0x1111);{ // S_REGREL32
-            out_int(offset_of_rbp, u32);
-            tpi_emit_type_index_or_predecl_type_index(context, decl->type, decl->defined_type);
-            out_int(334, u16); // CV_AMD64_RBP (cvconst.h)
-            out_string(decl->identifier->string);
-        }end_symbol();
-    }
-    
-}
-
-func struct pdb_location pdb_begin_scope(struct pdb_write_context *context, struct ast_function *function, struct ast_scope *scope){
-    
-    struct pdb_location pointer_to_end_loc;
-    smm scope_size = 0;
-    smm offset_in_text_section = function->offset_in_text_section;
-    
-    if(scope->start_line_index < function->line_information.size){ // Only false for empty functions.
-        
-        u32 start_offset = function->line_information.data[scope->start_line_index].offset;
-        u32 end_offset   = scope->end_line_index < function->line_information.size ? function->line_information.data[scope->end_line_index].offset : (u32)function->byte_size_without_prolog;
-        
-        // @cleanup: Does this correctly include function->size_of_prologue?
-        scope_size = end_offset - start_offset;
-        offset_in_text_section = function->offset_in_text_section + function->size_of_prolog + start_offset; // relocated by relocation.
-    }
-    
-    smm scope_offset_in_symbol_stream = pdb_current_offset_from_location(context, context->module_stream_begin);
-    begin_symbol(0x1103);{// S_BLOCK32
-        out_int(context->current_block32_offset_in_stream, u32);      // pointer to parent
-        pointer_to_end_loc = stream_allocate_bytes(context, sizeof(u32));
-        out_int(scope_size, u32);                                     // size of the scope in bytes
-        out_int(offset_in_text_section, u32);                         // offset in segment
-        out_int(context->text_section_id, u16);                                // segment
-    }end_symbol();
-    context->current_block32_offset_in_stream = scope_offset_in_symbol_stream;
-    return pointer_to_end_loc;
-}
-
-func void emit_debug_info_for_scope__recursive(struct pdb_write_context *context, struct ast_function *function, struct ast_scope *scope){
-    
-    // @cleanup: skip if there are no declarations in the scope.
-    
-    
-    struct pdb_location pointer_to_end_loc = zero_struct;
-    smm old_offset = context->current_block32_offset_in_stream;
-    
-    if(scope != function->scope){
-        // @note: do not emit a scope for the initial scope as it is implied by the frameproc
-        pointer_to_end_loc = pdb_begin_scope(context, function, scope);
-    }
-    
-    pdb_emit_regrels_for_scope(context, scope);
-    
-    for(struct ast_scope *subscope = scope->subscopes.first; subscope; subscope = subscope->subscopes.next){
-        emit_debug_info_for_scope__recursive(context, function, subscope);
-    }
-    
-    if(scope != function->scope){
-        u32 diff = pdb_current_offset_from_location(context, context->module_stream_begin);
-        stream_write_bytes(context, &pointer_to_end_loc, &diff, sizeof(u32));
-        begin_symbol(0x6);{ // S_END
-        }end_symbol();
-    }
-    context->current_block32_offset_in_stream = old_offset; // @cleanup: should maybe be called pointer
-}
-
-
-func void emit_debug_info_for_function(struct pdb_write_context *context, struct ast_function *function){
-    // @cleanup: is this needed somewhere else?
-    context->current_block32_offset_in_stream = function->debug_symbol_offset;
-    emit_debug_info_for_scope__recursive(context, function, function->scope);
-}
-
-//_____________________________________________________________________________________________________________________
-// 
-
-func void emit_one_pdb_line_info(struct pdb_write_context *context){
-    // @cleanup: line should only have lower bits set.. not sure?
-    u32 line   = save_truncate_smm_to_u32(context->pdb_line_at);
-    u32 offset = save_truncate_smm_to_u32(context->pdb_offset_at);
-    
-    out_int(offset, u32);
-    u32 is_statement = 0x80000000;
-    out_int(line | is_statement, u32);
-    context->pdb_amount_of_lines += 1;
-}
-
-func void emit_pdb_line_info_for_function(struct pdb_write_context *context, struct ast_function *function){
-    
-#if 0
-    context->pdb_amount_of_lines = 0;
-    context->pdb_offset_at = 0;
-    context->pdb_line_at   = function->scope->token->line;
-    emit_one_pdb_line_info(context); // emit an initial one and then we always emit _after_ updating
-    
-    emit_pdb_line_info_for_ast__recursive(context, function, function->scope);
-#else   
-    
-    const u32 is_statement = 0x80000000;
-    
-    struct ast_scope *scope = function->scope;
-    
-    // 
-    // Emit an initial line for the prologue.
-    // 
-    out_int(0, u32);
-    out_int(scope->token->line | is_statement, u32);
-    
-    for(smm index = 0; index < function->line_information.size; index++){
-        struct function_line_information line = function->line_information.data[index];
-        
-        u32 offset = (u32)(line.offset + function->size_of_prolog);
-        
-        out_int(offset, u32);
-        out_int(line.line | is_statement, u32);
-    }
-    context->pdb_amount_of_lines = function->line_information.size + 1;
-    
-#endif
-    
-}
-
-//_____________________________________________________________________________________________________________________
-
 
 func void print_coff(struct string output_file_path, struct memory_arena *arena, struct memory_arena *scratch){