Diff for /gforth/prim between versions 1.91 and 1.92

version 1.91, 2002/01/20 19:04:10 version 1.92, 2002/02/10 14:02:25
Line 2409  a_addr = (Cell *)(up+u); Line 2409  a_addr = (Cell *)(up+u);
 compile-prim ( xt1 -- xt2 )     new     compile_prim  compile-prim ( xt1 -- xt2 )     new     compile_prim
 xt2 = (Xt)compile_prim((Label)xt1);  xt2 = (Xt)compile_prim((Label)xt1);
   
 lit@    ( #a_addr -- w )        new     lit_fetch  lit@ / lit_fetch = lit @
 w = *a_addr;  
   
 lit-perform     ( #a_addr -- )  new     lit_perform  lit-perform     ( #a_addr -- )  new     lit_perform
 ip=IP;  ip=IP;
 SUPER_END;  SUPER_END;
 EXEC(*(Xt *)a_addr);  EXEC(*(Xt *)a_addr);
   
 lit+    ( #n1 n2 -- n3 )        new     lit_plus  lit+ / lit_plus = lit +
 n3 = n1 + n2;  
   
 does-exec ( #a_cfa -- R:nest a_pfa )    new     does_exec  does-exec ( #a_cfa -- R:nest a_pfa )    new     does_exec
 a_pfa = PFA(a_cfa);  a_pfa = PFA(a_cfa);

Removed from v.1.91  
changed lines
  Added in v.1.92


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>