+
+\ (SLEEP) uses system sleep functions to actually sleep.
+\ Use (MSEC.SPIN) on embedded systems that do not support Win32 Sleep() posix usleep().
+1 (SLEEP) [IF]
+ ." (SLEEP) failed or not implemented! Use (MSEC.SPIN) for MSEC" CR
+ ' (msec.spin) is msec
+[ELSE]
+ ' (msec) is msec
+[THEN]
+
+: MS ( msec -- , sleep, ANS standard )
+ msec
+;