godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added extnd_main routine

Browse Source
This commit is contained in:
ceriel 1989-03-22 16:44:20 +00:00
parent e12ef40218
commit 641221f9c0
2 changed files with 17 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
util/ceg/ce_back/as_back/bottom.c
View File

@ -109,3 +109,11 @@ int d;
sprint( name, "cont%x", d);
return( name);
}
char *extnd_main( d)
int d;
{
sprint( name, "main%x", d);
return( name);
}

9
util/ceg/ce_back/obj_back/extnd.c
View File

@ -119,3 +119,12 @@ int d;
index_symbol_table = find_sym( string, STORE_STRING);
return( symbol_table[ index_symbol_table].on_foff + string_area);
}
char *extnd_main( d)
int d;
{
string_lengte = mysprint( "%cmcnt%x", GENLAB, d);
index_symbol_table = find_sym( string, STORE_STRING);
return( symbol_table[ index_symbol_table].on_foff + string_area);
}