Added extnd_main routine
This commit is contained in:
parent
d763d3ddeb
commit
96c4943ef7
2 changed files with 17 additions and 0 deletions
|
@ -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);
|
||||
}
|
||||
|
|
|
@ -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);
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue