--- gforth/prim	2011/10/18 13:13:53	1.258
+++ gforth/prim	2011/11/21 01:37:12	1.259
@@ -2033,6 +2033,12 @@ duser = timeval2us(&time1);
 dsystem = DZERO;
 #endif
 
+ntime	( -- dtime )	gforth
+""Report the current time in nanoseconds since some epoch.""
+struct timespec t;
+clock_gettime(CLOCK_REALTIME,&t);
+dtime = timespec2ns(&t);
+
 \+
 
 \+floating