00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030 #ifndef _H_sysdep
00031 #define _H_sysdep
00032
00033 #ifndef _H_symbol
00034 #include "symbol.h"
00035 #endif
00036
00037 #ifndef _STDIO_INCLUDED_
00038 #define _STDIO_INCLUDED_
00039 #include <stdio.h>
00040 #endif
00041
00042 #include <setjmp.h>
00043
00044 #if WIN_BTC || WIN_MVC
00045 #include <dos.h>
00046 #endif
00047
00048 #ifdef LOCALE
00049 #undef LOCALE
00050 #endif
00051
00052 #ifdef _SYSDEP_SOURCE_
00053 #define LOCALE
00054 #else
00055 #define LOCALE extern
00056 #endif
00057
00058 LOCALE void InitializeEnvironment(void);
00059 LOCALE void EnvInitializeEnvironment(void *,struct symbolHashNode **,struct floatHashNode **,
00060 struct integerHashNode **,struct bitMapHashNode **,
00061 struct externalAddressHashNode **);
00062 LOCALE void SetRedrawFunction(void *,void (*)(void *));
00063 LOCALE void SetPauseEnvFunction(void *,void (*)(void *));
00064 LOCALE void SetContinueEnvFunction(void *,void (*)(void *,int));
00065 LOCALE void (*GetRedrawFunction(void *))(void *);
00066 LOCALE void (*GetPauseEnvFunction(void *))(void *);
00067 LOCALE void (*GetContinueEnvFunction(void *))(void *,int);
00068 LOCALE void RerouteStdin(void *,int,char *[]);
00069 LOCALE double gentime(void);
00070 LOCALE void gensystem(void *theEnv);
00071 LOCALE void VMSSystem(char *);
00072 LOCALE int GenOpenReadBinary(void *,char *,char *);
00073 LOCALE void GetSeekCurBinary(void *,long);
00074 LOCALE void GetSeekSetBinary(void *,long);
00075 LOCALE void GenTellBinary(void *,long *);
00076 LOCALE void GenCloseBinary(void *);
00077 LOCALE void GenReadBinary(void *,void *,size_t);
00078 LOCALE FILE *GenOpen(void *,char *,char *);
00079 LOCALE int GenClose(void *,FILE *);
00080 LOCALE void genexit(void *,int);
00081 LOCALE int genrand(void);
00082 LOCALE void genseed(int);
00083 LOCALE int genremove(char *);
00084 LOCALE int genrename(char *,char *);
00085 LOCALE char *gengetcwd(char *,int);
00086 LOCALE void GenWrite(void *,size_t,FILE *);
00087 LOCALE int (*EnvSetBeforeOpenFunction(void *,int (*)(void *)))(void *);
00088 LOCALE int (*EnvSetAfterOpenFunction(void *,int (*)(void *)))(void *);
00089 LOCALE int gensprintf(char *,const char *,...);
00090 LOCALE char *genstrcpy(char *,const char *);
00091 LOCALE char *genstrncpy(char *,const char *,size_t);
00092 LOCALE char *genstrcat(char *,const char *);
00093 LOCALE char *genstrncat(char *,const char *,size_t);
00094 LOCALE void SetJmpBuffer(void *,jmp_buf *);
00095 LOCALE void genprintfile(void *,FILE *,char *);
00096 LOCALE int gengetchar(void *);
00097 LOCALE int genungetchar(void *,int);
00098
00099 #if WIN_BTC
00100 LOCALE __int64 _RTLENTRY _EXPFUNC strtoll(const char *,char **,int);
00101 LOCALE __int64 _RTLENTRY _EXPFUNC llabs(__int64 val);
00102 #endif
00103
00104 #endif
00105
00106
00107
00108
00109