From acd80efad346d9d7dbed9aa3380d8f77eda0ed56 Mon Sep 17 00:00:00 2001
From: "Arnold D. Robbins" <arnold@skeeve.com>
Date: Wed, 29 May 2013 22:15:20 +0300
Subject: Additional fix in profile.c.

---
 profile.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'profile.c')

diff --git a/profile.c b/profile.c
index 095de099..d3a93dbd 100644
--- a/profile.c
+++ b/profile.c
@@ -443,7 +443,7 @@ cleanup:
 			array = t1->pp_str;
 			if (pc->expr_count > 0) {
 				char *sub;
-				sub = pp_list(pc->expr_count, NULL, ", ");
+				sub = pp_list(pc->expr_count, NULL, pc->expr_count > 1 ? "][" : ", ");
 				fprintf(prof_fp, "%s %s[%s]", op2str(Op_K_delete), array, sub);
 				efree(sub);
 			} else 				
-- 
cgit v1.2.3