cde/programs/tttypes/dtinfo.ptype

   1 /*
   2  * $XConsortium: dtinfo.ptype /main/1 1996/06/17 14:28:05 rcs $
   3  *
   4  * (c) Copyright 1996 Digital Equipment Corporation.
   5  * (c) Copyright 1996 Hewlett-Packard Company.
   6  * (c) Copyright 1996 International Business Machines Corp.
   7  * (c) Copyright 1996 Sun Microsystems, Inc.
   8  * (c) Copyright 1996 Novell, Inc.
   9  * (c) Copyright 1996 FUJITSU LIMITED.
  10  * (c) Copyright 1996 Hitachi.
  11  */
  12
  13 #include "dtinfo_start.opnums"
  14
  15 ptype DtInfo {
  16         start   "/usr/dt/infolib/etc/dtinfo_start";
  17         handle:
  18                 session DtInfo_LoadInfoLib (
  19                                 in string action_name,
  20                                 in string info_lib_host,
  21                                 in string locale)
  22                         => start opnum = LOAD_INFO_LIB;
  23
  24                 session DtInfo_ShowInfoAtLoc (
  25                                 in string action_name,
  26                                 in string info_lib_host,
  27                                 in string locale,
  28                                 in string section)
  29                         => start opnum =  SHOW_INFO_AT_LOC;
  30         observe:
  31                 session DtInfo_Quit () => opnum = QUIT_DTINFO;
  32 }
  33
  34 ptype DtInfoPrint {
  35       start "/usr/dt/bin/dtinfo -print";
  36       handle:
  37
  38       /* print a specified section */
  39       session DtInfo_PrintInfoAtLoc()
  40                                         => start opnum=PRINT_INFO_AT_LOC;
  41 };