Add utility word

diff --git a/basis/timers/timers.factor b/basis/timers/timers.factor
index ab6b4d63fbbc8746362abdb4521a34e4a0da8759..a12ecba830690fe66d002f0677c381b23aa4a5d4 100644 (file)
--- a/basis/timers/timers.factor
+++ b/basis/timers/timers.factor
@@ -117,3 +117,6 @@ PRIVATE>
 
 : delayed-every ( quot duration -- timer )
     dup (start-timer) ;
+
+: nanos-since ( nano-count -- nanos )
+    [ nano-count ] dip - ;