* Define host port dependant constants etc.
*/
-#define DOS_DIR_SEPARATOR_CHAR '\\'
-#define DOS_DIR_SEPARATOR_STRING "\\"
#define UNIX_DIR_SEPARATOR_CHAR '/'
-#define UNIX_DIR_SEPARATOR_STRING "/"
#ifdef _WIN32 /* WIN32 native */
-#define NATIVE_WIN32 1
-#ifdef __MINGW32__ /* GCC MINGW32 depends on configure */
-#include "sdccconf.h"
-#else
-#include "sdcc_vc.h"
-#define PATH_MAX _MAX_PATH
-#endif
-#define DIR_SEPARATOR_CHAR DOS_DIR_SEPARATOR_CHAR
-#define DIR_SEPARATOR_STRING DOS_DIR_SEPARATOR_STRING
+# define NATIVE_WIN32 1
+# ifdef __MINGW32__ /* GCC MINGW32 depends on configure */
+# include "sdccconf.h"
+# else
+# include "sdcc_vc.h"
+# define PATH_MAX _MAX_PATH
+# endif
#else /* Assume Un*x style system */
-
-#include "sdccconf.h"
-#define DIR_SEPARATOR_CHAR UNIX_DIR_SEPARATOR_CHAR
-#define DIR_SEPARATOR_STRING UNIX_DIR_SEPARATOR_STRING
-
+# include "sdccconf.h"
#endif
#include "SDCCerr.h"
#include <limits.h> /* PATH_MAX */
#ifndef PATH_MAX /* POSIX, but not required */
-#define PATH_MAX 255 /* define a reasonable value */
+# define PATH_MAX 255 /* define a reasonable value */
#endif
#define MAX_REG_PARMS 1
typedef int bool;
#ifndef max
-#define max(a,b) (a > b ? a : b)
+# define max(a,b) (a > b ? a : b)
#endif
#ifndef min
-#define min(a,b) (a < b ? a : b)
+# define min(a,b) (a < b ? a : b)
#endif
#ifndef THROWS
#define FLOATSIZE port->s.float_size
#define MAXBASESIZE port->s.max_base_size
-
-#define PRAGMA_SAVE "SAVE"
-#define PRAGMA_RESTORE "RESTORE"
-#define PRAGMA_NOINDUCTION "NOINDUCTION"
-#define PRAGMA_NOINVARIANT "NOINVARIANT"
-#define PRAGMA_NOLOOPREV "NOLOOPREVERSE"
-#define PRAGMA_INDUCTION "INDUCTION"
-#define PRAGMA_STACKAUTO "STACKAUTO"
-#define PRAGMA_NOJTBOUND "NOJTBOUND"
-#define PRAGMA_NOGCSE "NOGCSE"
-#define PRAGMA_NOOVERLAY "NOOVERLAY"
-#define PRAGMA_CALLEESAVES "CALLEE-SAVES"
-#define PRAGMA_EXCLUDE "EXCLUDE"
-#define PRAGMA_NOIV "NOIV"
-#define PRAGMA_OVERLAY "OVERLAY"
-#define PRAGMA_LESSPEDANTIC "LESS_PEDANTIC"
-
#define SMALL_MODEL 0
#define LARGE_MODEL 1
#define TRUE 1
#define COPYTYPE(start,end,from) (end = getSpec (start = from))
-/* generalpurpose stack related macros */
-#define STACK_DCL(stack,type,size) \
- typedef type t_##stack ; \
- t_##stack stack[size] ; \
- t_##stack (*p_##stack) = stack + (size); \
+/* general purpose stack related macros */
+#define STACK_DCL(stack,type,size) \
+ typedef type t_##stack ; \
+ t_##stack stack[size] ; \
+ t_##stack (*p_##stack) = stack;
/* define extern stack */
-#define EXTERN_STACK_DCL(stack,type,size) \
- typedef type t_##stack ; \
- extern t_##stack stack[size] ; \
+#define EXTERN_STACK_DCL(stack,type,size) \
+ typedef type t_##stack ; \
+ extern t_##stack stack[size] ; \
extern t_##stack *p_##stack;
-#define STACK_FULL(stack) ((p_##stack) <= stack )
-#define STACK_EMPTY(stack) ((p_##stack) >= (stack + \
- sizeof(stack)/sizeof(*stack)) )
+#define STACK_EMPTY(stack) ((p_##stack) <= stack )
+#define STACK_FULL(stack) ((p_##stack) >= (stack + \
+ sizeof(stack)/sizeof(*stack)) )
-#define STACK_PUSH_(stack,x) (*--p_##stack = (x))
-#define STACK_POP_(stack) (*p_##stack++)
+#define STACK_PUSH_(stack, x) (*++p_##stack = (x))
+#define STACK_POP_(stack) (*p_##stack--)
-#define STACK_PUSH(stack,x) (STACK_FULL(stack) \
- ?((t_##stack)(long)(STACK_ERR(1))) \
- : STACK_PUSH_(stack,x) )
+#define STACK_PUSH(stack, x) (STACK_FULL(stack) \
+ ? (STACK_ERR(1, stack), *p_##stack) \
+ : STACK_PUSH_(stack,x) )
-#define STACK_POP(stack) (STACK_EMPTY(stack) \
- ?((t_##stack)(long)(STACK_ERR(0))) \
- : STACK_POP_(stack) )
+#define STACK_POP(stack) (STACK_EMPTY(stack) \
+ ? (STACK_ERR(-1, stack), *p_##stack) \
+ : STACK_POP_(stack) )
-#define STACK_PEEK(stack) (STACK_EMPTY(stack) \
- ?((t_##stack) NULL) \
- : *p_##stack )
+#define STACK_PEEK(stack) (STACK_EMPTY(stack) \
+ ? (STACK_ERR(0, stack), *p_##stack) \
+ : *p_##stack )
-#define STACK_ERR(o) ( o \
- ? fprintf(stderr,"stack Overflow\n")\
- : fprintf(stderr,"stack underflow\n"))
+#define STACK_ERR(o, stack) (fatal(1, E_STACK_VIOLATION, #stack, \
+ (o < 0) \
+ ? "underflow" \
+ : (o > 0) \
+ ? "overflow" \
+ : "empty"))
/* optimization options */
struct optimize
int code_loc; /* code location start */
int iram_size; /* internal ram size (used only for error checking) */
int xram_size; /* external ram size (used only for error checking) */
- bool xram_size_set; /* since xram_size=0 is a possibility */
+ bool xram_size_set; /* since xram_size=0 is a possibility */
int code_size; /* code size (used only for error checking) */
int verboseExec; /* show what we are doing */
int noXinitOpt; /* don't optimize initialized xdata */
int noCcodeInAsm; /* hide c-code from asm */
int iCodeInAsm; /* show i-code in asm */
+ int printSearchDirs; /* display the directories in the compiler's search path */
};
/* forward definition for variables accessed globally */