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

many modyfications in search for more speed

Browse Source
This commit is contained in:
ceriel
1988-10-31 15:42:15 +00:00
parent 63f793aff3
commit 7851ff900f
19 changed files with 208 additions and 134 deletions
Download Patch File Download Diff File Expand all files Collapse all files

34
util/ceg/ce_back/obj_back/reloc2.c
View File

@@ -8,26 +8,36 @@
* absolute.
*/
#ifdef WORDS_REVERSED
#ifdef BYTES_REVERSED
#define RRR (RELO2|RELBR|RELWR)
#else
#define RRR (RELO2|RELWR)
#endif
#else
#ifdef BYTES_REVERSED
#define RRR (RELO2|RELBR)
#else
#define RRR (RELO2)
#endif
#endif
reloc2( sym, off, pcrel)
char *sym;
arith off;
int pcrel;
{
register struct outrelo *r;
if ( relo - reloc_info >= size_reloc)
mem_relo();
relo->or_type = RELO2;
#ifdef BYTES_REVERSED
relo->or_type |= RELBR;
#endif
#ifdef WORDS_REVERSED
relo->or_type |= RELWR;
#endif
relo->or_type |= ( pcrel) ? RELPC : S_UND;
relo->or_sect = S_MIN + conv_seg( cur_seg);
relo->or_nami = find_sym(sym, REFERENCE);
relo->or_addr = cur_value();
gen2( (pcrel) ? off - ( cur_value() + 2) : off);
r = relo;
r->or_type = ( pcrel) ? RELPC|RRR : RRR;
r->or_sect = S_MIN + conv_seg( cur_seg);
r->or_nami = find_sym(sym, REFERENCE);
r->or_addr = cur_value();
gen2( (pcrel) ? off - ( r->or_addr + 2) : off);
relo++;
}