X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Fizt%2Ftlcs900h.c;h=f3b42af648791e5ab61e6e868a4a68406648ee59;hb=761a78cecf4e8d3810a7557204f9e324a08eb795;hp=82b5c4bc8762d38152990bfbdf553644c3822ac5;hpb=abf72462cc7dd96c3089b77078e322cfd60020ed;p=fw%2Fsdcc

diff --git a/src/izt/tlcs900h.c b/src/izt/tlcs900h.c
index 82b5c4bc..f3b42af6 100644
--- a/src/izt/tlcs900h.c
+++ b/src/izt/tlcs900h.c
@@ -3,85 +3,107 @@
 */
 #include "izt.h"
 
-static REG _tlcs900h_regs[] = {
-    { 1, REG_ID_C,   "c",   0, { REG_ID_BC, REG_ID_NONE, REG_ID_NONE } },
-    { 1, REG_ID_B,   "b",   0, { REG_ID_BC, REG_ID_NONE, REG_ID_NONE } },
-    { 1, REG_ID_E,   "e",   0, { REG_ID_DE, REG_ID_NONE, REG_ID_NONE } },
-    { 1, REG_ID_D,   "d",   0, { REG_ID_DE, REG_ID_NONE, REG_ID_NONE } },
-    { 2, REG_ID_BC,  "bc",  0, { REG_ID_C, REG_ID_B, REG_ID_NONE } },
-    { 2, REG_ID_DE,  "de",  0, { REG_ID_E, REG_ID_D, REG_ID_NONE } },
-    { 4, REG_ID_XBC, "xbc", 0, { REG_ID_C, REG_ID_B, REG_ID_BC } },
-    { 4, REG_ID_XDE, "xde", 0, { REG_ID_E, REG_ID_D, REG_ID_DE } },
-    { 0, REG_ID_NONE,"??",  0, { REG_ID_NONE, REG_ID_NONE, REG_ID_NONE } }
+static REG _tlcs900h_regs[] =
+{
+  {1, REG_ID_C, "c", 0,
+   {REG_ID_BC, REG_ID_NONE, REG_ID_NONE}},
+  {1, REG_ID_B, "b", 0,
+   {REG_ID_BC, REG_ID_NONE, REG_ID_NONE}},
+  {1, REG_ID_E, "e", 0,
+   {REG_ID_DE, REG_ID_NONE, REG_ID_NONE}},
+  {1, REG_ID_D, "d", 0,
+   {REG_ID_DE, REG_ID_NONE, REG_ID_NONE}},
+  {2, REG_ID_BC, "bc", 0,
+   {REG_ID_C, REG_ID_B, REG_ID_NONE}},
+  {2, REG_ID_DE, "de", 0,
+   {REG_ID_E, REG_ID_D, REG_ID_NONE}},
+  {4, REG_ID_XBC, "xbc", 0,
+   {REG_ID_C, REG_ID_B, REG_ID_BC}},
+  {4, REG_ID_XDE, "xde", 0,
+   {REG_ID_E, REG_ID_D, REG_ID_DE}},
+  {0, REG_ID_NONE, "??", 0,
+   {REG_ID_NONE, REG_ID_NONE, REG_ID_NONE}}
 };
 
-static IZT_PORT _tlcs900h_port = {
-    _tlcs900h_regs
+static IZT_PORT _tlcs900h_port =
+{
+  _tlcs900h_regs
 };
 
 static char _defaultRules[] =
 {
     //#include "peeph.rul"
+    ""
 };
 
-static char *_tlcs900h_keywords[] =     {
-    NULL
+static char *_tlcs900h_keywords[] =
+{
+  NULL
 };
 
-void tlcs900h_assignRegisters (eBBlock **ebbs, int count);
+void tlcs900h_assignRegisters (eBBlock ** ebbs, int count);
 
-static void _tlcs900h_init(void)
+static void
+_tlcs900h_init (void)
 {
-    asm_addTree(&asm_asxxxx_mapping);
-    izt_init(&_tlcs900h_port);
+  asm_addTree (&asm_asxxxx_mapping);
+  izt_init (&_tlcs900h_port);
 }
 
-static void _tlcs900h_reset_regparm()
+static void
+_tlcs900h_reset_regparm ()
 {
 }
 
-static int _tlcs900h_regparm( sym_link *l)
+static int
+_tlcs900h_regparm (sym_link * l)
 {
-    // PENDING: No register parameters.
-    return 0;
+  // PENDING: No register parameters.
+  return 0;
 }
 
-static bool _tlcs900h_parseOptions(int *pargc, char **argv, int *i)
+static bool
+_tlcs900h_parseOptions (int *pargc, char **argv, int *i)
 {
-    /* TODO: allow port-specific command line options to specify
-     * segment names here.
-     */
-    return FALSE;
+  /* TODO: allow port-specific command line options to specify
+   * segment names here.
+   */
+  return FALSE;
 }
 
-static void _tlcs900h_finaliseOptions(void)
+static void
+_tlcs900h_finaliseOptions (void)
 {
-    // No options
+  // No options
 }
 
-static void _tlcs900h_setDefaultOptions(void)
+static void
+_tlcs900h_setDefaultOptions (void)
 {
-    // No options
+  // No options
 }
 
-static const char *_tlcs900h_getRegName(struct regs *reg)
+static const char *
+_tlcs900h_getRegName (struct regs *reg)
 {
-    if (reg)
-	return reg->name;
-    wassert(0);
-    return "err";
+  if (reg)
+    return reg->name;
+  wassert (0);
+  return "err";
 }
 
-static void _tlcs900h_genAssemblerPreamble(FILE *of)
+static void
+_tlcs900h_genAssemblerPreamble (FILE * of)
 {
-    // PENDING
+  // PENDING
 }
 
 /* Generate interrupt vector table. */
-static int _tlcs900h_genIVT(FILE *of, symbol **interrupts, int maxInterrupts)
+static int
+_tlcs900h_genIVT (FILE * of, symbol ** interrupts, int maxInterrupts)
 {
-    // PENDING
-    return 0;
+  // PENDING
+  return 0;
 }
 
 /** $1 is always the basename.
@@ -91,89 +113,115 @@ static int _tlcs900h_genIVT(FILE *of, symbol **interrupts, int maxInterrupts)
     MUST be terminated with a NULL.
 */
 // PENDING
-static const char *_linkCmd[] = {
-    "aslink", "-nf", "$1", NULL
+static const char *_linkCmd[] =
+{
+  "aslink", "-nf", "$1", NULL
 };
 
 // PENDING
-static const char *_asmCmd[] = {
- "gpasm", NULL, NULL, NULL
+static const char *_asmCmd[] =
+{
+  "gpasm", NULL, NULL, NULL
 };
 
-void tlcs900h_assignRegisters (eBBlock **ebbs, int count)
+void
+tlcs900h_assignRegisters (eBBlock ** ebbs, int count)
 {
 }
 
 /* Globals */
-PORT tlcs900h_port = {
-    "tlcs900h",
-    "Toshiba TLCS-900H",	/* Target name */
-    {
-	TRUE,			/* Emit glue around main */
-	MODEL_SMALL,
-	MODEL_SMALL
-    },
-    {	
-	_asmCmd,
-	NULL,
-	NULL,
-	0
-    },
-    {
-	_linkCmd,
-	NULL,
-	".o"
-    },
-    {
-	_defaultRules
-    },
-    {
-    	/* Sizes: char, short, int, long, ptr, fptr, gptr, bit, float, max */
-	1, 2, 2, 4, 2, 2, 2, 1, 4, 4
-    },
-    {
-	"XSEG    (XDATA)",
-	"STACK   (DATA)",
-	"CSEG    (CODE)",
-	"DSEG    (DATA)",
-	"ISEG    (DATA)",
-	"XSEG    (XDATA)",
-	"BSEG    (BIT)",
-	"RSEG    (DATA)",
-	"GSINIT  (CODE)",
-	"OSEG    (OVR,DATA)",
-	"GSFINAL (CODE)",
-	"HOME	 (CODE)",
-	NULL,
-	NULL,
-	1
-    },
-    { 
-	+1, 1, 4, 1, 1, 0
-    },
-    /* tlcs900h has an 16 bit mul */
-    {
-	2, 0
-    },
-    "_",
-    _tlcs900h_init,
-    _tlcs900h_parseOptions,
-    _tlcs900h_finaliseOptions,
-    _tlcs900h_setDefaultOptions,
-    tlcs900h_assignRegisters,
-    _tlcs900h_getRegName ,
-    _tlcs900h_keywords,
-    _tlcs900h_genAssemblerPreamble,
-    _tlcs900h_genIVT ,
-    _tlcs900h_reset_regparm,
-    _tlcs900h_regparm,
+PORT tlcs900h_port =
+{
+  TARGET_ID_TLCS900H,
+  "tlcs900h",
+  "Toshiba TLCS-900H",		/* Target name */
+  NULL,
+  {
+    glue,
+    TRUE,			/* Emit glue around main */
+    MODEL_SMALL,
+    MODEL_SMALL
+  },
+  {
+    _asmCmd,
+    NULL,
     NULL,
-    FALSE,
-    0,  /* leave lt */
-    0,  /* leave gt */
-    1,  /* transform <= to ! > */
-    1,  /* transform >= to ! < */
-    1,  /* transform != to !(a == b) */
-    0,  /* leave == */
-    PORT_MAGIC
+    NULL,
+    0,
+    NULL,
+    NULL			/* no do_assemble function */
+  },
+  {
+    _linkCmd,
+    NULL,
+    NULL,
+    ".o"
+  },
+  {
+    _defaultRules
+  },
+  {
+	/* Sizes: char, short, int, long, ptr, fptr, gptr, bit, float, max */
+    1, 2, 2, 4, 2, 2, 2, 1, 4, 4
+  },
+  /* tags for generic pointers */
+  { 0x00, 0x40, 0x60, 0x80 },		/* far, near, xstack, code */
+  {
+    "XSEG    (XDATA)",
+    "STACK   (DATA)",
+    "CSEG    (CODE)",
+    "DSEG    (DATA)",
+    "ISEG    (DATA)",
+    "XSEG    (XDATA)",
+    "BSEG    (BIT)",
+    "RSEG    (DATA)",
+    "GSINIT  (CODE)",
+    "OSEG    (OVR,DATA)",
+    "GSFINAL (CODE)",
+    "HOME	 (CODE)",
+    NULL, // xidata
+    NULL, // xinit
+    NULL,
+    NULL,
+    1
+  },
+  {
+    +1, 1, 4, 1, 1, 0
+  },
+    /* tlcs900h has an 16 bit mul */
+  {
+    2, -1
+  },
+  "_",
+  _tlcs900h_init,
+  _tlcs900h_parseOptions,
+  NULL,
+  _tlcs900h_finaliseOptions,
+  _tlcs900h_setDefaultOptions,
+  tlcs900h_assignRegisters,
+  _tlcs900h_getRegName,
+  _tlcs900h_keywords,
+  _tlcs900h_genAssemblerPreamble,
+  NULL,				/* no genAssemblerEnd */
+  _tlcs900h_genIVT,
+  0, // _tlcs900h_genXINIT
+  _tlcs900h_reset_regparm,
+  _tlcs900h_regparm,
+  NULL,
+  NULL,
+  NULL,
+  FALSE,
+  0,				/* leave lt */
+  0,				/* leave gt */
+  1,				/* transform <= to ! > */
+  1,				/* transform >= to ! < */
+  1,				/* transform != to !(a == b) */
+  0,				/* leave == */
+  FALSE,                        /* No array initializer support. */	
+  0,                            /* no CSE cost estimation yet */
+  NULL, 			/* no builtin functions */
+  GPOINTER,			/* treat unqualified pointers as "generic" pointers */
+  1,				/* reset labelKey to 1 */
+  1,				/* globals & local static allowed */
+  PORT_MAGIC
 };