[gforth] / gforth / history.fs  

gforth: gforth/history.fs

Diff for /gforth/history.fs between version 1.9 and 1.10

version 1.9, Sun Jan 7 17:22:11 1996 UTC version 1.10, Thu May 9 18:13:00 1996 UTC
Line 72 
Line 72 
   REPEAT  2drop  THEN    REPEAT  2drop  THEN
   tuck 2dup type 0 ;    tuck 2dup type 0 ;
   
 : ctrl  ( "<char>" -- ctrl-code )  : ctrl ( compilation: "<char>" -- ) ( run-time: -- ctrl-code )
   char [char] @ - postpone Literal ; immediate    char [char] @ - postpone Literal ; immediate
   interpretation: ( "<char>" -- ctrl-code )
       char [char] @ - ;
   
 Create lfpad #lf c,  Create lfpad #lf c,
   


Generate output suitable for use with a patch program
Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10

CVS Admin

Powered by ViewCVS 1.0-dev
(Powered by ViewCVS)

ViewCVS and CVS Help