Files
harbour-core/contrib/hbnf/tests/sleep.prg
vszakats 9687850865 2013-03-16 02:10 UTC+0100 Viktor Szakats (harbour syenar.net)
* (all files)
    * stripped svn header
    * minor cleanups
    ; use following command to find out the history of files:
       git log
       git log --follow
       git blame
       git annotate
2013-03-16 02:11:42 +01:00

13 lines
197 B
Plaintext

#require "hbnf"
// Invoke by running SLEEP 1.0 to sleep 1.0 seconds
PROCEDURE Main( nSleep )
? "Time is now: " + Time()
ft_Sleep( Val( nSleep ) )
? "Time is now: " + Time()
RETURN