summaryrefslogtreecommitdiff
path: root/src/regression/while.c
diff options
context:
space:
mode:
authorXavier ASUS <xavi92psx@gmail.com>2019-10-18 00:31:54 +0200
committerXavier ASUS <xavi92psx@gmail.com>2019-10-18 00:31:54 +0200
commit268a53de823a6750d6256ee1fb1e7707b4b45740 (patch)
tree42c1799a9a82b2f7d9790ee9fe181d72a7274751 /src/regression/while.c
downloadsdcc-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 'src/regression/while.c')
-rw-r--r--src/regression/while.c42
1 files changed, 42 insertions, 0 deletions
diff --git a/src/regression/while.c b/src/regression/while.c
new file mode 100644
index 0000000..4429b88
--- /dev/null
+++ b/src/regression/while.c
@@ -0,0 +1,42 @@
+#include "gpsim_assert.h"
+
+unsigned char failures = 0;
+
+unsigned int aint0 = 0;
+unsigned int aint1 = 0;
+unsigned char achar0 = 0;
+unsigned char achar1 = 0;
+
+
+void
+done()
+{
+ ASSERT(MANGLE(failures) == 0);
+ PASSED();
+}
+
+void
+while1 (void)
+{
+ unsigned char i = 10;
+
+ do
+ {
+ achar0++;
+ }
+ while (--i);
+
+ if (achar0 != 10)
+ failures++;
+
+}
+
+
+void
+main (void)
+{
+ while1 ();
+
+
+ done ();
+}