d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Avoid DVI instruction. Use library call instead

Browse source
This commit is contained in:
ceriel 1991-09-24 10:45:43 +00:00
parent 4ecf088423
commit 9ec49cb6d9
1 changed files with 5 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
lang/pc/comp/code.c
View file

@ -188,12 +188,9 @@ CodeBeginBlock(df)
C_mli(word_size);
C_loc(word_size - 1);
C_adi(word_size);
C_loc(word_size);
C_dvi(word_size);
/* size in words */
C_loc(word_size);
C_mli(word_size);
/* size in bytes */
C_loc(word_size - 1);
C_com(word_size);
C_and(word_size);
C_dup(word_size);
C_lol(StackAdjustment);
C_adi(word_size);
@ -531,22 +528,15 @@ CodeBoper(expr, true_label)
break;
case DIV:
Operands(leftop, rightop);
if( tp->tp_fund == T_INTEGER || tp->tp_fund == T_LONG)
C_dvi(tp->tp_size);
else
crash("(CodeBoper: bad type DIV)");
break;
case MOD:
Operands(leftop, rightop);
if( tp->tp_fund == T_INTEGER ) {
C_cal("_mdi");
C_cal(expr->nd_symb == MOD ? "_mdi" : "_dvi");
C_asp(2 * tp->tp_size);
C_lfr(tp->tp_size);
}
else if( tp->tp_fund == T_LONG) {
C_cal("_mdil");
C_cal(expr->nd_symb == MOD ? "_mdil" : "_dvil");
C_asp(2 * tp->tp_size);
C_lfr(tp->tp_size);
}