term/src/Termios.i3

 $Id: Termios.i3.html,v 1.3 2010-04-29 17:20:12 wagner Exp $ 

UNSAFE INTERFACE Termios;

FROM Ctypes IMPORT int;

CONST

<*EXTERNAL Termios__Stdin*>     VAR Stdin: int;
<*EXTERNAL Termios__Tcsanow*>   VAR Tcsanow: int;

TYPE
  T = ADDRESS;

<*EXTERNAL Termios__tcsetattr*> PROCEDURE tcsetattr(fd, action: int; t: T);

END Termios.