updated comments

diff --git a/packnl.lsp b/packnl.lsp
index e49d9439dfeee2e420cc128fa32f0c388c7542a1..333d54e24dbf6b8ef196f102ef7f6fa7b7ab6203 100644 (file)
--- a/packnl.lsp
+++ b/packnl.lsp
@@ -63,8 +63,7 @@
               (if DIR (write-file (string DIR "/" N) (P S D)) (println N))
               (inc P S))))))))
 
-;; clear the compiler index
-;; Drop the compile members from the index
+;; clear the compiler archive index, to be used for source archives
 (dolist (M (map first (archives))) (archives M nil))
 
 (when (or (!= 1 (length (clean null? OPTIONS)))