rev 575 - trunk/src

SVN User <[email protected]> Fri, 04 Jun 2004 16:36:05 -0400
Newsgroups gmane.comp.lang.prothon.cvs
Message-ID <[email protected]>
Author: mark
Date: 2004-06-04 16:36:02 -0400 (Fri, 04 Jun 2004)
New Revision: 575

Modified:
   trunk/src/interp.c
Log:
fixed console bug

Modified: trunk/src/interp.c
===================================================================
--- trunk/src/interp.c	2004-06-04 20:08:23 UTC (rev 574)
+++ trunk/src/interp.c	2004-06-04 20:36:02 UTC (rev 575)
@@ -109,7 +109,6 @@
 	size_t flen;
 	if (code_in)       code = code_in;
 	else if (func_obj) code = obj_data_p(func_obj);
-	pr_assert(code);
 	flen = sizeof(frame_t) + ( code ? (code->max_stack_depth+STACK_PADDING) * sizeof(obj_p) : 0 );
 	frame = pr_malloc(flen);
 	memset(frame, 0, flen);