1 #ifndef __PTOC_H__
2 #define __PTOC_H__
3 
4 #include <stdio.h>
5 #include <stdlib.h>
6 #include <string.h>
7 #include <stdarg.h>
8 #include <assert.h>
9 
10 #define items(x) (sizeof(x)/sizeof(*(x)))
11 
12 typedef int           integer;
13 typedef unsigned      cardinal; /* unsigned integer */
14 typedef float         real;
15 
16 #if defined(TURBO_PASCAL) || defined(HP_PASCAL)
17 typedef unsigned       word; /* It should have the same size as integer */
18 typedef unsigned char  byte;
19 #endif
20 
21 #ifdef TURBO_PASCAL
22 typedef long           longint;
23 typedef signed char    shortint;
24 typedef void*          pointer;
25 typedef const char*    asciiz;
26 #endif
27 
28 typedef unsigned char boolean;
29 #define true          (1)
30 #define false         (0)
31 
32 #define nil           NULL
33 
34 #define EXTERN        extern
35 
36 /*
37  * Pascal runtime library headers
38  */
39 
40 #include "io.h"
41 #include "array.h"
42 #include "paslib.h"
43 #include "set.h"
44 
45 #endif
46 
47 
48