--- gforth/kernel/cond.fs	2007/12/31 18:40:26	1.22
+++ gforth/kernel/cond.fs	2010/03/25 16:25:53	1.23
@@ -224,7 +224,7 @@ Avariable leave-sp  leave-stack 3 cells
     leave-sp ! ;
 
 : DONE ( compilation orig -- ; run-time -- ) \ gforth
-    \ !! the original done had ( addr -- )
+    \g resolves all LEAVEs up to the compilaton orig (from a BEGIN)
     drop >r drop
     begin
 	leave>