gforth/primitives - diff

Return to primitives CVS log

Up to [gforth] / gforth

version 1.59, 1996/09/10 16:08:39	version 1.60, 1996/12/23 15:07:46
Line 449 u2 = u1-n;	Line 449 u2 = u1-n;
+ n1 n2 -- n core plus	+ n1 n2 -- n core plus
n = n1+n2;	n = n1+n2;

\ PFE has it differently, so let's better not define it	\ PFE-0.9.14 has it differently, but the next release will have it as follows
\ under+ n1 n2 n3 -- n n2 gforth under_plus	under+ n1 n2 n3 -- n n2 gforth under_plus
\ ""add @var{n3} to @var{n1} (giving @var{n})""	""add @var{n3} to @var{n1} (giving @var{n})""
\ /* and pfe */	n = n1+n3;
\ n = n1+n3;	:
\ :	rot + swap ;
\ rot + swap ;

- n1 n2 -- n core minus	- n1 n2 -- n core minus
n = n1-n2;	n = n1-n2;