* src/SDCCast.c (isConformingBody): fixed bug 1505811, thanks Robert Larice
[fw/sdcc] / support / regression / tests / libmullong.c
index a469b93af99936c2528ed1042359fff2620f75c1..fc26af4b1bcdc2123a6a6c47941bcb5b82a6ac69 100644 (file)
@@ -11,7 +11,7 @@
 #  define mullong(a,b) mullong_wrapper(a,b)
 #  if defined(type_c) && !defined(WORDS_BIGENDIAN)
 #    define _SDCC_NO_ASM_LIB_FUNCS 1
-#    define near
+#    define __near
 #    define long int
 #    include "device/lib/_mullong.c"
 #  endif
  */
 #if defined(PORT_HOST)
 
+#define TYPE_TARGET_CHAR  TYPE_BYTE
+#define TYPE_TARGET_INT   TYPE_WORD
+#define TYPE_TARGET_LONG  TYPE_DWORD
+#define TYPE_TARGET_UCHAR TYPE_UBYTE
+#define TYPE_TARGET_UINT  TYPE_UWORD
+#define TYPE_TARGET_ULONG TYPE_UDWORD
+
 #if defined(type_c) && !defined(WORDS_BIGENDIAN)
 struct
 {
@@ -36,8 +43,8 @@ struct
   char c2;
 } pack_test;
 
-TYPE_DWORD
-mullong_wrapper (TYPE_DWORD a, TYPE_DWORD b)
+TYPE_TARGET_LONG
+mullong_wrapper (TYPE_TARGET_LONG a, TYPE_TARGET_LONG b)
 {
   if (sizeof(pack_test) == 4)
     /* length of struct ok: use SDCC library */
@@ -51,8 +58,8 @@ mullong_wrapper (TYPE_DWORD a, TYPE_DWORD b)
 
 #else
 
-TYPE_DWORD
-mullong_wrapper (TYPE_DWORD a, TYPE_DWORD b)
+TYPE_TARGET_LONG
+mullong_wrapper (TYPE_TARGET_LONG a, TYPE_TARGET_LONG b)
 {
     return a * b;
 }