[agd-cvs] server/src interpret.h,1.15,1.16

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

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

Modified Files:
	interpret.h 
Log Message:
Added runtime_dyn.

Index: interpret.h
===================================================================
RCS file: /cvsroot/agd/server/src/interpret.h,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -d -r1.15 -r1.16
--- interpret.h	12 Jun 2004 16:46:33 -0000	1.15
+++ interpret.h	20 Jun 2004 14:04:08 -0000	1.16
@@ -2,11 +2,14 @@
 #define _INTERPRET_H
 
 variable_t *apply(object_t *ob, char *fun, char *argfmt, ...);
-void runtime(char *s, int free_str);
+void _runtime(char *s, int free_str);
 
 #define pop_stack() sp--; free_var(sp)
 #define pop_locals() while(sp > fp) { sp--; free_var(sp); }
 
+#define runtime(msg) _runtime(msg, 0)
+#define runtime_dyn(msg) _runtime(msg, 1)
+
 typedef struct {
 	variable_t *sp, *fp;
 	int num_arg;