changed comment

svn: r14892
2009-05-20 23:59:24 +00:00 · 2009-05-20 23:59:24 +00:00 · 116d961f35
commit 116d961f35
parent 2e3a0bcd0d
1 changed files with 4 additions and 1 deletions
--- a/collects/stepper/view-controller.ss
+++ b/collects/stepper/view-controller.ss
@ -358,7 +358,10 @@
             (list x:finished-text 'finished-stepping (list))])])
      (hand-off-and-block step-text step-kind posns)))
  
-  ;; need to capture the custodian as the thread starts up:
+  ;; program-expander-prime : wrap the program-expander for a couple of reasons:
+  ;; 1) we need to capture the custodian as the thread starts up:
+  ;; ok, it was just one.
+  ;; 
  (define (program-expander-prime init iter)
    (program-expander
     (lambda args