Fixed ADF 4 error

This commit is contained in:
ceriel 1991-10-02 12:36:36 +00:00
parent 9381b34dfa
commit ed1a07a874

View file

@ -1027,7 +1027,12 @@ C_adf_narg ==>
if (n == EM_WSIZE) if (n == EM_WSIZE)
{ {
f1= pop_float(); f1= pop_float();
inc_tos_reg(f1); f2= pop_float();
f3= alloc_float();
"fadds $f2, $f1, $f3";
free_reg(f1);
free_reg(f2);
push_reg(f3);
} }
else if (n == EM_DSIZE) else if (n == EM_DSIZE)
{ {