[agd-cvs] server/src compile.c,1.23,1.24

[Peep P. <so...@us...>]

Update of /cvsroot/agd/server/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6610

Modified Files:
	compile.c 
Log Message:
curr_fun_check() uses memset to clear the new function

Index: compile.c
===================================================================
RCS file: /cvsroot/agd/server/src/compile.c,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -d -r1.23 -r1.24
--- compile.c	8 Jun 2004 20:24:10 -0000	1.23
+++ compile.c	12 Jun 2004 16:48:00 -0000	1.24
@@ -490,8 +490,9 @@
 {
 	if(!curr_fun) {
 		curr_fun = xmalloc(sizeof(function_t));
-		curr_fun->codelen = 0;
-		curr_fun->code = NULL;
+		memset(curr_fun, 0, sizeof *curr_fun); /* XXX */
+/*		curr_fun->codelen = 0;
+		curr_fun->code = NULL;*/
 	}
 }