diff options
| author | Xavier ASUS <xavi92psx@gmail.com> | 2019-10-18 00:31:54 +0200 |
|---|---|---|
| committer | Xavier ASUS <xavi92psx@gmail.com> | 2019-10-18 00:31:54 +0200 |
| commit | 268a53de823a6750d6256ee1fb1e7707b4b45740 (patch) | |
| tree | 42c1799a9a82b2f7d9790ee9fe181d72a7274751 /support/regression/tests/bug-2349.c | |
| download | sdcc-gas-268a53de823a6750d6256ee1fb1e7707b4b45740.tar.gz | |
sdcc-3.9.0 fork implementing GNU assembler syntax
This fork aims to provide better support for stm8-binutils
Diffstat (limited to 'support/regression/tests/bug-2349.c')
| -rwxr-xr-x | support/regression/tests/bug-2349.c | 66 |
1 files changed, 66 insertions, 0 deletions
diff --git a/support/regression/tests/bug-2349.c b/support/regression/tests/bug-2349.c new file mode 100755 index 0000000..8ce2129 --- /dev/null +++ b/support/regression/tests/bug-2349.c @@ -0,0 +1,66 @@ +/*
+ bug-2349.c
+*/
+
+#include <testfwk.h>
+
+#pragma disable_warning 85
+
+long subchar(void *pa, void *pb)
+{
+ return *((char *) pa) - *((char *) pb);
+}
+
+long subint(void *pa, void *pb)
+{
+ return *((int *) pa) - *((int *) pb);
+}
+
+long sublong(void *pa, void *pb)
+{
+ return *((long *) pa) - *((long *) pb);
+}
+
+long addlong(void *pa, void *pb)
+{
+ return *((long *) pa) + *((long *) pb);
+}
+
+#define NULL ((void *) 0)
+
+#if defined (__SDCC_MODEL_MEDIUM)
+typedef long (*subfunc_t)(void *pa, void * __pdata pb);
+#elif defined (__SDCC_MODEL_LARGE)
+typedef long (*subfunc_t)(void *pa, void * __xdata pb);
+#elif defined (__SDCC_MODEL_HUGE)
+typedef long (*subfunc_t)(void *pa, void * __xdata pb);
+#else
+typedef long (*subfunc_t)(void *pa, void *pb);
+#endif
+
+subfunc_t dosub(subfunc_t f)
+{
+#if !defined( __SDCC_pdk14) && !defined( __SDCC_pdk15)
+ if (f == subchar)
+ return subint;
+ else if (f == subint)
+ return sublong;
+ else if (f == sublong)
+ return subchar;
+ else if (f == NULL)
+ return addlong;
+ else
+ return NULL;
+#endif
+}
+
+void testBug(void)
+{
+#if !defined( __SDCC_pdk14) && !defined( __SDCC_pdk15)
+ ASSERT (dosub(subchar) == subint);
+ ASSERT (dosub(subint) == sublong);
+ ASSERT (dosub(sublong) == subchar);
+ ASSERT (dosub(addlong) == NULL);
+ ASSERT (dosub(NULL) == addlong);
+#endif
+}
|