The following page contains reserved words. These are not part of the ANS Forth Standard. They are just proposed by various people and published here at FORTH.SF.NET for public review.

:NON: :STD:

TOC

        ( -- u )

Two consecutive calls to this word shall return an approximation of milliseconds of the time that has passed between the two calls. The unsigned number may wrap over, the number does not need to have any relation to the real time clock of the system, the system clock ticks do not need to have millisecond resolution.

This word has its name from the win32 syscall GetTime(), it is closely related to the forth MS word that could loop around GETTIME calls.

  : MS GETTIME BEGIN 2DUP GETTIME - U< UNTIL 2DROP ;
  : MS MS@ BEGIN 2DUP MS@ - U< UNTIL 2DROP ;

See: 10.6.2.1905 MS, 10.6.2.1905 MS, 10.6.2.2292 TIME&DATE,