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

Added grind support

Browse Source
This commit is contained in:
ceriel
1991-11-01 11:53:42 +00:00
parent 6d553a379a
commit 6f4094c7c4
22 changed files with 179 additions and 39 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -77,9 +77,9 @@ char *s;
char *extnd_dlb( g)
arith g;
label g;
{
string_lengte = mysprint( DLB_FMT, (arith)g);
string_lengte = mysprint( DLB_FMT, (long)g);
index_symbol_table = find_sym( string, STORE_STRING);
return( symbol_table[ index_symbol_table].on_foff + string_area);
}
@@ -88,7 +88,7 @@ arith g;
char *extnd_ilb( l, prcno)
arith l;
{
string_lengte = mysprint( ILB_FMT, prcno, (arith) l);
string_lengte = mysprint( ILB_FMT, prcno, (long) l);
index_symbol_table = find_sym( string, STORE_STRING);
return( symbol_table[ index_symbol_table].on_foff + string_area);
}