luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

[INTERPRETER]

Browse Source 
* BUG: Fix debug information loading on 64 bits OS.


git-svn-id: svn://localhost/gambas/trunk@2980 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
Benoît Minisini 2010-05-29 23:01:05 +00:00
parent f75d640e3b
commit 65645599cb
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
main/gbx/gbx_class_load.c
View File

@ -593,7 +593,7 @@ static void load_and_relocate(CLASS *class, int len_data, int *pndesc, int *pfir
if (class->debug) if (class->debug)
{ {
class->load->global = (GLOBAL_SYMBOL *)get_section("debug global", &section, &class->load->n_global, _s _s _p _c _i ); class->load->global = (GLOBAL_SYMBOL *)get_section("debug global", &section, &class->load->n_global, _p _i _c _i );
class->load->sort = (ushort *)get_section("debug global sort", &section, NULL, _s); class->load->sort = (ushort *)get_section("debug global sort", &section, NULL, _s);
#ifdef OS_64BITS #ifdef OS_64BITS
class->load->debug = class->load->debug =
@ -615,7 +615,7 @@ static void load_and_relocate(CLASS *class, int len_data, int *pndesc, int *pfir
for (i = 0; i < class->load->n_func; i++) for (i = 0; i < class->load->n_func; i++)
{ {
func = &class->load->func[i]; func = &class->load->func[i];
func->debug->local = (LOCAL_SYMBOL *)get_section("debug local", &section, &func->debug->n_local, _s _s _p _i ); func->debug->local = (LOCAL_SYMBOL *)get_section("debug local", &section, &func->debug->n_local, _p _i _i );
} }
} }