1 files changed, 5 insertions, 0 deletions
diff --git a/awkgram.c b/awkgram.c
index 3efbd137..a79f9a30 100644
--- a/awkgram.c
+++ b/awkgram.c
@@ -4625,6 +4625,11 @@ mk_program()
 				cp = end_block;
 			else
 				cp = list_merge(begin_block, end_block);
+			/*
+			 * We don't need to clear the comment variables
+			 * since they're not used anymore after this
+			 * function is called.
+			 */
 			if (comment != NULL)
 				(void) list_append(cp, comment);
 			(void) list_append(cp, ip_atexit);