Index: /branches/objc-gf/ccl/lib/nfcomp.lisp
===================================================================
--- /branches/objc-gf/ccl/lib/nfcomp.lisp	(revision 6047)
+++ /branches/objc-gf/ccl/lib/nfcomp.lisp	(revision 6048)
@@ -900,5 +900,5 @@
 (defvar *make-load-form-hash*)
 
-;Return a hash table containing subexp's which are referenced more than once.
+;;;Return a hash table containing subexp's which are referenced more than once.
 (defun fasl-scan (forms)
   (let* ((*fasdump-hash* (make-hash-table :size (length forms)          ; Crude estimate