[gforth] / gforth / history.fs  

gforth: gforth/history.fs

Diff for /gforth/history.fs between version 1.61 and 1.62

version 1.61, Sun Jul 1 20:01:32 2007 UTC version 1.62, Thu Jul 19 13:28:18 2007 UTC
Line 203 
Line 203 
 Variable curpos  Variable curpos
 Variable screenw  Variable screenw
   
   : at-deltaxy ( dx dy -- )
       #esc emit '[ emit  dup abs 0 .r 0< IF  'A  ELSE  'B  THEN  emit
       #esc emit '[ emit  dup abs 0 .r 0< IF  'D  ELSE  'C  THEN  emit ;
   
 : cygwin? ( -- flag ) s" TERM" getenv s" cygwin" str= ;  : cygwin? ( -- flag ) s" TERM" getenv s" cygwin" str= ;
 : at-xy? ( -- x y )  : at-xy? ( -- x y )
     key? drop \ make sure prep_terminal() is executed      key? drop \ make sure prep_terminal() is executed

Generate output suitable for use with a patch program
Legend:
Removed from v.1.61  
changed lines
  Added in v.1.62
CVS Admin

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help