/[mldonkey]/mldonkey/src/utils/net/terminal.ml
ViewVC logotype

Diff of /mldonkey/src/utils/net/terminal.ml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by simon_mld, Tue Apr 22 22:33:40 2003 UTC revision 1.2 by spiralvoice, Sat Nov 19 17:19:45 2005 UTC
# Line 42  module Vt100 = struct Line 42  module Vt100 = struct
42        cx := x;        cx := x;
43        cy := y        cy := y
44      end;      end;
45      Printf.printf "\027[%d;%dH" (y+1) (x+1)      Printf2.lprintf "\027[%d;%dH" (y+1) (x+1)
46                
47    let stdvid () = print_string "\027[m" (* "]" *);;    let stdvid () = print_string "\027[m" (* "]" *);;
48                

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26