*** empty log message ***

2006-02-04 19:37:40 +00:00 · 2006-02-04 19:37:40 +00:00 · 37078b8afc
commit 37078b8afc
parent a4264220ed
1 changed files with 2 additions and 1 deletions
--- a/ase/awk/parse.c
+++ b/ase/awk/parse.c
@ -1,5 +1,5 @@
 /*
- * $Id: parse.c,v 1.43 2006-02-04 19:31:51 bacon Exp $
+ * $Id: parse.c,v 1.44 2006-02-04 19:37:40 bacon Exp $
 */

 #include <xp/awk/awk.h>
@ -591,6 +591,7 @@ static xp_awk_node_t* __parse_block (xp_awk_t* awk, xp_bool_t is_top)
 	block->next = XP_NULL;
 	block->body = head;

+	/* migrate all local variables to a top-level block */
 	if (is_top) {
 		block->nlocals = awk->parse.nlocals_max - nlocals;
 		awk->parse.nlocals_max = nlocals;