home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / mod201j.zip / modula2.exe / os2api / winsei.def < prev    next >
Text File  |  1994-05-03  |  2KB  |  49 lines

  1. DEFINITION MODULE WINSEI;
  2.  
  3. (************************************************************************
  4.   OS/2 2.0 Presentation Manager SetErrorInfo constants
  5.            and function declaration.
  6.  
  7.   Copyright (c) 1992 by Juergen Neuhoff
  8. *************************************************************************)
  9.  
  10. (*$XL+       Modula-2 language extensions: '_' allowed for symbol names *)
  11. (*$CDECL+    C-style procedures                                         *)
  12. (*$A         default alignment for record fields                        *)
  13.  
  14. IMPORT SYSTEM;
  15. FROM   OS2DEF  IMPORT ERRORID;
  16.  
  17. PROCEDURE WinSetErrorInfo
  18. ( ErrorId             : ERRORID;
  19.   Option              : LONGCARD;
  20.   VAR ErrorInfo       : ARRAY OF SYSTEM.BYTE
  21. )                     : ERRORID;
  22.  
  23. CONST
  24.   SEI_BREAKPOINT   = 8000H; (* Always enter an INT 3 breakpt            *)
  25.   SEI_NOBEEP       = 4000H; (* Do not call DosBeep                      *)
  26.   SEI_NOPROMPT     = 2000H; (* Do not prompt the user                   *)
  27.   SEI_DBGRSRVD     = 1000H; (* Reserved for debug use                   *)
  28.   SEI_STACKTRACE   = 0001H; (* save the stack trace                     *)
  29.   SEI_REGISTERS    = 0002H; (* save the registers                       *)
  30.   SEI_ARGCOUNT     = 0004H; (* first CARDINAL in args is arg count      *)
  31.   SEI_DOSERROR     = 0008H; (* first CARDINAL in args is OS2 error code *)
  32.   SEI_RESERVED     = 0FE0H; (* Reserved for future use                  *)
  33.   SEI_DEBUGONLY    = SEI_BREAKPOINT OR SEI_NOBEEP    OR
  34.                      SEI_NOPROMPT   OR SEI_RESERVED;
  35.  
  36. (************************************************************************
  37. * Note that when SEI_ARGCOUNT, SEI_DOSERROR are specified
  38. * together, then the implied order of the parameters is:
  39. *
  40. *
  41. *  WinSetErrorInfo( MAKEERRORID( .... ),
  42. *                   SEI_ARGCOUNT | SEI_DOSERROR,
  43. *                   argCount,
  44. *                   dosErrorCode);
  45. *
  46. *************************************************************************)
  47.  
  48. END WINSEI.
  49.