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