INTERFACE Uutmp;

FROM Ctypes IMPORT char_star;

<*EXTERNAL "Uutmp__getlogin"*> PROCEDURE getlogin (): char_star;

END Uutmp.