Fix comments to be ! not #!.

[factor.git] / basis / tools / deploy / shaker / shaker.factor

diff --git a/basis/tools/deploy/shaker/shaker.factor b/basis/tools/deploy/shaker/shaker.factor
index 73a6e521882c6182caa954296b87af2a32762f02..b0c4a9e7113e96de2fad2d8c09b5c21fb1f3bf73 100755 (executable)
--- a/basis/tools/deploy/shaker/shaker.factor
+++ b/basis/tools/deploy/shaker/shaker.factor
@@ -599,11 +599,11 @@ SYMBOL: deploy-vocab
     clear-megamorphic-caches ;
 
 : die-with ( error original-error -- * )
-    #! We don't want DCE to drop the error before the die call!
+    ! We don't want DCE to drop the error before the die call!
     [ die 1 exit ] ( a -- * ) call-effect-unsafe ;
 
 : die-with2 ( error original-error -- * )
-    #! We don't want DCE to drop the error before the die call!
+    ! We don't want DCE to drop the error before the die call!
     [ die 1 exit ] ( a b -- * ) call-effect-unsafe ;
 
 : deploy-error-handler ( quot -- )
@@ -617,8 +617,8 @@ SYMBOL: deploy-vocab
     ] recover ; inline
 
 : (deploy) ( final-image vocab-manifest-out vocab config -- )
-    #! Does the actual work of a deployment in the slave
-    #! stage2 image
+    ! Does the actual work of a deployment in the slave
+    ! stage2 image
     [
         [
             strip-debugger? [