clean 1.3.3 backend again again

git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@189 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d

1 files changed, 118 insertions, 0 deletions

diff --git a/backendC/CleanCompilerSources/system.h b/backendC/CleanCompilerSources/system.h
new file mode 100644
index 0000000..2d964ff
--- /dev/null
+++ b/backendC/CleanCompilerSources/system.h
@@ -0,0 +1,118 @@
+/*
+       system.h
+       Author: Eric Nocker
+       At: Department of Computer Science
+           University of Nijmegen
+*/
+
+#define _SYSTEM_
+#define _WINDOWS_
+
+#if defined (applec) || (defined (__MWERKS__) && !defined (_WINDOWS_)) || defined (__MRC__)
+#	define _MAC_
+#	define _STANDALONE_
+
+#define __ppc__
+
+#elif defined (THINK_C)
+#	define _MACUSER_
+#else
+#	define _STANDALONE_
+#endif
+
+#define _DEBUG_
+
+#if defined (_MAC_)
+# include "mac.h"
+#elif defined (_MACUSER_)
+# include "macuser.h"
+#elif defined (_SUN_)
+# include "sun.h"
+#elif defined (OS2)
+#  include "os2.h"
+#elif defined (_WINDOWS_)
+#  include "windows_io.h"
+#else
+#  include "standard.h"
+#endif
+
+#include "types.t"
+
+#ifdef GEN_SUPPORT_H
+# include "gensupport.h"
+#else
+
+#define MAXPATHLEN 1024
+
+extern char *PATHLIST;
+
+extern char *GetFileExtension (FileKind kind);
+extern File FOpen (char *wname, FileKind kind, char *mode);
+#if defined(WRITE_DCL_MODIFICATION_TIME) && WRITE_DCL_MODIFICATION_TIME
+extern File FOpenWithFileTime (char *file_name,FileKind kind, char *mode,FileTime *file_time_p);
+#endif
+extern int FDelete (char *fname, FileKind kind);
+extern int FClose (File f);
+
+#ifdef _MACUSER_
+/* const declarations required */
+	extern int FPrintF (File f, const char *fmt,...);
+	extern int FPutS (const char *s, File f);
+	extern size_t FWrite (const void *ptr, size_t size, size_t count, File f);
+#else
+extern int FPutS (char *s, File f);
+extern size_t FWrite (void *ptr, size_t size, size_t count, File f);
+# ifdef _VARARGS_
+extern int FPrintF (File f, char *fmt,...);
+# else
+extern int FPrintF (); /* (File w, char *fmt,...) */
+# endif
+#endif
+
+#if defined (_MACUSER_)
+	extern File StdOut;
+	extern File StdError;
+	extern File StdVerboseH;
+	extern File StdVerboseL;
+	extern File StdListTypes;
+#endif
+
+#ifndef __ppc__
+extern char *FGetS (char *s, int n, File f);
+#endif
+extern size_t FRead (void *ptr, size_t size, size_t count, File f);
+extern int FSeek (File f, long offset, int origin);
+extern long FTell (File f);
+extern FileTime FGetFileTime (char *fname, FileKind kind);
+#if defined(WRITE_DCL_MODIFICATION_TIME) && WRITE_DCL_MODIFICATION_TIME
+extern void FWriteFileTime (FileTime file_time,File f);
+#endif
+extern Bool GetOptionsFromIclFile (char *fname, CompilerOptions *opts);
+
+#ifdef _VARARGS_
+	extern void DoError (char *fmt,...);
+	extern void DoFatalError (char *fmt,...);
+	extern void CmdError (char *errormsg,...);
+#else
+	extern void DoError ();
+	extern void DoFatalError ();
+	extern void CmdError ();
+#endif
+
+extern void (*SetSignal (void (*f) (void))) (void);
+	
+extern int CheckInterrupt (void);
+
+extern void *Alloc (unsigned long count, SizeT size);
+
+extern void Free (void *p);
+
+#ifdef THINK_C
+#define ReSize(A) (((A)+1) & ~1)
+#else
+#define ReSize(A) (((A)+3) & ~3)
+#endif
+
+extern int System (char *s);
+
+#endif