<*+ CSTDLIB *> <*- NOHEADER *> <*+ M2EXTENSIONS *> DEFINITION MODULE ["C"] ptty; FROM SYSTEM IMPORT ADDRESS; PROCEDURE getptsname(fd:INTEGER; name:ADDRESS; len:CARDINAL):INTEGER; PROCEDURE grantpts(fd:INTEGER):INTEGER; PROCEDURE unlockpts(fd:INTEGER):INTEGER; END ptty.