Listing:

    1  (******************************************************************************)
    2  (*                    META.MOD  -  MetaWINDOW Initialisation.                 *)
    3  (*                                                                            *)
    4  (*  This module initialises the MetaWINDOW or MetaWINDOW Plus v3.6a interface.*)
    5  (*                                                                            *)
    6  (*  PSW 10/31/90 02:44am                                                      *)
    7  (******************************************************************************)
    8  
    9  IMPLEMENTATION MODULE Meta;
   10  (*
   11   *  Graphix
   12   *  Release 3.7
   13   *  (c) Copyright 1986-1992 PMI
   14   *  Green Bay, Wisconsin
   15   *  (414) 468-6040
   16   *  All rights reserved
   17   *
   18   *)
   19  
   20    IMPORT MW;
   21  
   22    VAR
   23      FarPTR: FarADDRESS;
*****              ^ undeclared identifier
   24  
   25  BEGIN
   26    (*** Ensure the library is properly linked in.  The Meta_DPL byte seems   ***)
   27    (*** always to be zero at first but this may not always be true.          ***)
   28    FarPTR := FarADR(MW.Meta_DPL);
*****    ^ not supported yet
*****              ^ undeclared identifier
*****                     ^ not supported yet
*****                        ^ not supported yet
   29  
   30    IF (FarPTR = FarNIL) THEN
*****        ^ not supported yet
*****                 ^ undeclared identifier
   31      HALT
*****      ^ undeclared identifier
   32    END;
   33  END Meta.
*****      ^ not supported yet

    9 errors