9687850865
* (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
12 lines
197 B
Plaintext
12 lines
197 B
Plaintext
|
|
#require "hbnf"
|
|
|
|
PROCEDURE Main( cTime )
|
|
|
|
cTime := iif( cTime == NIL, Time(), cTime )
|
|
? "Setting time to: " + cTime + "... "
|
|
ft_SetTime( cTime )
|
|
? "Time is now: " + Time()
|
|
|
|
RETURN
|