--- gforth/tasker.fs	1997/07/06 14:42:14	1.5
+++ gforth/tasker.fs	1997/09/13 12:04:59	1.6
@@ -41,10 +41,9 @@ Create sleepers  sleepers A, sleepers A,
   lp! fp! rp! prev-task @ sleep ;
 
 \ USER' computes the task offset
-: user' ( 'user' -- n )
-    ' >body @ postpone literal ; immediate
-interpretation:
-    ' >body @ ;
+:noname    ' >body @ ;
+:noname    ' >body @ postpone literal ; 
+interpret/compile: user' ( 'user' -- n )
 
 \ NEWTASK creates a new, sleeping task
 : NewTask ( n -- Task )  dup 2* 2* udp @ + dup