rtforth 0.6.8

Forth implemented in Rust for realtime application
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25

//! Facility word set

use core::Core;

pub trait Facility: Core {
    /// Run-time: ( --  )
    ///
    /// Add facility primitives.
    fn add_facility(&mut self) {
        self.add_primitive("mtime", Facility::mtime);
        self.add_primitive("utime", Facility::utime);
    }

    /// System time in milli-seconds. `mtime ( -- milli-seconds )`
    fn mtime(&mut self) {
        let now = self.system_time_ns() / 1_000_000;
        self.s_stack().push(now as isize);
    }

    /// System time in micro-seconds. `utime ( -- micro-seconds )`
    fn utime(&mut self) {
        let now = self.system_time_ns() / 1_000;
        self.s_stack().push(now as isize);
    }
}