/* 浜様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様融 */
/* � DEFINEs und TYPEDEFs f�r TURBO-PASCAL-Module                         � */
/* �                                                                      � */
/* � 09.11.1992 WK: Erste Angaben f�r Datentypen und Funktionen           � */
/* �                                                                      � */
/* 藩様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様夕 */

#ifndef TPASCAL
#define TPASCAL far pascal          /* je nach Compiler �ndern  */

enum BOOLEANTYPE    {False, True} ; /* Pascal-like  */

typedef unsigned char   Boolean ;
typedef unsigned char   Byte    ;
typedef signed   short  Integer ;
typedef unsigned short  Word    ;
typedef signed   long   LongInt ;
typedef void far       *Pointer ;
typedef void            Procedure;

#define Nil             ((void far *)0L)
#define False           (0)
#define True            (1)

#endif