Topspeed_JPI/TS-V3/INCLUDE/PIC.LST

Listing:

    1  (****************************** Module Header ******************************
    2  *
    3  * Copyright (c) 1989..1992  Clarion Software Corporation
    4  *
    5  * This file is compatible with OS/2 version 1.2.
    6  *
    7  * Module Name: Pic
    8  *
    9  * OS/2 Presentation Manager Window Manager definition file
   10  * Release 3.10
   11  *
   12  *****************************************************************************
   13  *)
   14  
   15  (*# call(o_a_size => off,
   16           o_a_copy=>off,
   17           result_optional=>on,
   18           reg_saved => (si, di, ds, st1, st2),
   19           reg_param => (),
   20           seg_name => none,
   21           near_call => off,
   22           ds_eq_ss => off) *)
   23  (*# module(implementation=>off, init_code => off) *)
   24  (*# name(prefix => os2_lib) *)
   25  (*# data(near_ptr => off) *)
   26  (*# check(index=>off,range=>off,overflow=>off,nil_ptr=>off) *)
   27  
   28  DEFINITION MODULE Pic;
   29  FROM OS2DEF IMPORT HAB;
   30  
   31  CONST
   32  (* type of picture to print *)
   33    PIP_MF       = 1;
   34    PIP_PIF      = 2;
   35  
   36  (* type of conversion required *)
   37    PIC_PIFTOMET = 0;
   38    PIC_SSTOFONT = 2;
   39  
   40  
   41  PROCEDURE Print(h:HAB; VAR fname:ARRAY OF CHAR; Type:LONGINT; VAR Params:ARRAY OF CHAR): BOOLEAN;
*****                                            ^ not supported yet
*****                                                                                    ^ not supported yet
   42  PROCEDURE Ichg(h:HAB; VAR fname1,fname2:ARRAY OF CHAR; Type:LONGINT): BOOLEAN;
*****                                                   ^ not supported yet
   43  
   44  END Pic.
*****      ^ not supported yet

    4 errors