hpib_3.imp
上传用户:upcnvip
上传日期:2007-01-06
资源大小:474k
文件大小:1k
源码类别:

编译器/解释器

开发平台:

C/C++

  1. {IncludeFrom=hpib_3 <p2c/hpib_3.h>}
  2. {*VarStrings=0} {*ExportSymbol=P_%s} {*Export_Symbol=%s}
  3. MODULE hpib_3 ;        
  4.         { by      Tim Mikkelsen
  5.           date    07/17/81
  6.           update  01/08/82
  7.           
  8.           purpose This module contains the LEVEL 
  9.                   3 HPIB GROUP procedures.   
  10.                 
  11.         }
  12. IMPORT    iodeclarations ;  
  13.   
  14. EXPORT
  15.   
  16.                           
  17.   FUNCTION  requested
  18.                     ( select_code : type_isc )
  19.                     : BOOLEAN ;
  20.   FUNCTION  ppoll   ( select_code : type_isc )
  21.                     : INTEGER ;
  22.   FUNCTION  spoll   ( device      : type_device)
  23.                     : INTEGER ;   
  24.   
  25.   PROCEDURE request_service 
  26.                     ( select_code : type_isc ;
  27.                       response    : INTEGER );
  28.   FUNCTION  listener( select_code : type_isc )
  29.                     : BOOLEAN;
  30.   FUNCTION  talker  ( select_code : type_isc )   
  31.                     : BOOLEAN ;
  32.   FUNCTION  remoted ( select_code : type_isc )
  33.                     : BOOLEAN ;
  34.   FUNCTION  locked_out
  35.                     ( select_code : type_isc )
  36.                     : BOOLEAN ;
  37.   
  38.   
  39.   
  40. END.    { of hpib_3 }