Index: src/pl/plpgsql/src/gram.y
===================================================================
RCS file: /home/projects/pgsql/cvsroot/pgsql/src/pl/plpgsql/src/gram.y,v
retrieving revision 1.22
diff -c -r1.22 gram.y
*** src/pl/plpgsql/src/gram.y	2001/07/11 18:54:18	1.22
--- src/pl/plpgsql/src/gram.y	2001/07/12 01:15:05
***************
*** 332,338 ****
  					{
  						PLpgSQL_rec		*new;
  
! 						new = malloc(sizeof(PLpgSQL_var));
  
  						new->dtype		= PLPGSQL_DTYPE_REC;
  						new->refname	= $1.name;
--- 332,338 ----
  					{
  						PLpgSQL_rec		*new;
  
! 						new = malloc(sizeof(PLpgSQL_rec));
  
  						new->dtype		= PLPGSQL_DTYPE_REC;
  						new->refname	= $1.name;
***************
*** 374,381 ****
  						new = malloc(sizeof(PLpgSQL_var));
  						memset(new, 0, sizeof(PLpgSQL_var));
  
! 						curname_def = malloc(sizeof(PLpgSQL_var));
! 						memset(curname_def, 0, sizeof(PLpgSQL_var));
  
  						new->dtype		= PLPGSQL_DTYPE_VAR;
  						new->refname	= $1.name;
--- 374,381 ----
  						new = malloc(sizeof(PLpgSQL_var));
  						memset(new, 0, sizeof(PLpgSQL_var));
  
! 						curname_def = malloc(sizeof(PLpgSQL_expr));
! 						memset(curname_def, 0, sizeof(PLpgSQL_expr));
  
  						new->dtype		= PLPGSQL_DTYPE_VAR;
  						new->refname	= $1.name;