sdcc-3.9.0 fork implementing GNU assembler syntax

This fork aims to provide better support for stm8-binutils

1 files changed, 108 insertions, 0 deletions

diff --git a/src/regression/for.c b/src/regression/for.c
new file mode 100644
index 0000000..9c9314e
--- /dev/null
+++ b/src/regression/for.c
@@ -0,0 +1,108 @@
+#include "gpsim_assert.h"
+
+unsigned char failures=0;
+
+unsigned int uint0 = 0;
+unsigned int uint1 = 0;
+unsigned char uchar0 = 0;
+unsigned char uchar1 = 0;
+
+void
+done()
+{
+  ASSERT(MANGLE(failures) == 0);
+  PASSED();
+}
+
+void for1(void)
+{
+  unsigned char i=0;
+
+  for(i=0; i<10; i++)
+    uchar0++;
+
+  if(uchar0 != 10)
+    failures++;
+
+}
+
+void for2(void)
+{
+  unsigned char i=0;
+  unsigned char j;
+
+  for(i=0; i<10; i++)
+    uchar0++;
+
+  j = (volatile)i;
+
+  if(j != 10)
+    failures++;
+
+}
+
+void for3(void)
+{
+  unsigned int i=0;
+  volatile unsigned int j;
+
+  for(i=0; i<10; i++)
+    uint0++;
+
+  j = i;
+  if(j != 10)
+    failures++;
+
+}
+
+void for4(void)
+{
+
+  for(uint0=1; uint0<10; uint0++)
+    uchar0++;
+
+  if(uchar0 != 9)
+    failures++;
+
+}
+
+void for5(void)
+{
+
+  for(uint0=1; uint0<=10; uint0++)
+    uchar0++;
+
+  if(uchar0 != 10)
+    failures++;
+
+}
+
+void inc_uchar0(void)
+{
+  uchar0++;
+}
+
+void for6(void)
+{
+  uchar0 = 0;
+  for(uint0=1; uint0<=10; uint0++)
+    inc_uchar0();
+
+}
+
+void main(void)
+{
+  for1();
+  for2();
+  for3();
+  uchar0 = 0;
+  for4();
+  uchar0 = 0;
+  for5();
+
+  for6();
+  if(uchar0 != 10)
+    failures++;
+
+  done();
+}