2004-01-06 Vangelis Rokas <vrokas@otenet.gr>

[fw/sdcc] / src / regression / inline.c

diff --git a/src/regression/inline.c b/src/regression/inline.c
index 643e734106cb5a1eda78c56d48b921a0bae16b62..d129fea9306244ad64705848c4c13c220106c907 100644 (file)
--- a/src/regression/inline.c
+++ b/src/regression/inline.c
@@ -19,6 +19,24 @@ void done(void)
   dummy++;
 
 }
+
+void
+delay_1ms(void)
+{
+  unsigned char cnt1m = 2;
+  unsigned char cnt500u = 249;
+
+  do {
+    do {
+      _asm
+        nop
+        nop
+      _endasm;
+    } while (--cnt500u > 0);
+  } while (--cnt1m > 0);
+}
+
+
 void main(void)
 {
   dummy = 0;