Topspeed_JPI/TS-V3/INCLUDE/TERM.LST

Listing:

    1  (* Release 3.10 *)
    2  (*-------------------------------------------------------------------------*
    3  *                                                                          *
    4  *  TERM.DEF - COMMS Toolkit terminal emulation                             *
    5  *                                                                          *
    6  *  COPYRIGHT (C) 1988..1992 Clarion Software Corporation.                  *
    7  *  All Rights Reserved                                                     *
    8  *                                                                          *
    9  *--------------------------------------------------------------------------*)
   10  
   11  DEFINITION MODULE Term;
   12  
   13    TYPE
   14      Emulations          = (EmANSI,EmVT100,EmVT52);
   15  
   16    PROCEDURE WrChar(c:CHAR);
   17    PROCEDURE RdKey():CHAR;
   18    PROCEDURE KeyPressed():BOOLEAN;
   19    
   20    PROCEDURE ClearScreen;
   21    
   22    PROCEDURE Emulation():Emulations;
   23    
   24    PROCEDURE EmulateVT100;
   25    PROCEDURE EmulateVT52;
   26    PROCEDURE EmulateANSI;
   27  
   28  END Term.
*****      ^ not supported yet
   29  

    1 error