--- gforth/kernel/int.fs	2003/01/08 10:45:39	1.85
+++ gforth/kernel/int.fs	2003/01/10 21:19:59	1.86
@@ -450,6 +450,10 @@ has? standardthreading has? compiler and
 \G @i{a-addr} is the start of the Forth code after @code{DOES>}.
     dodoes: over ! cell+ ! ;
 
+' drop alias does-handler! ( a_addr -- ) \ gforth
+\G Create a @code{DOES>}-handler at address @i{a-addr}. Normally,
+\G @i{a-addr} points just behind a @code{DOES>}.
+
 2 cells constant /does-handler ( -- n ) \ gforth
 \G The size of a @code{DOES>}-handler (includes possible padding).