summaryrefslogtreecommitdiff
path: root/dviware/psprint/unix/globals.h
blob: b2e49f4b7ccb9a5ae553f2f3e0e14414b1902cf8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
(* Global data and routines *)

CONST
   maxstring  = 80;
   maxstringm = maxstring - 1;

TYPE
   string = ARRAY [0..maxstringm] OF CHAR;

VAR
   warncount : INTEGER;   (* used to determine exit status *)

PROCEDURE exit (status : integer);        EXTERNAL;
(* SYSDEP: 0 = success, 1 = error, 2 = warning *)