[agd-cvs] server/src dfuns.c,1.19,1.20

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

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

Modified Files:
	dfuns.c 
Log Message:
Removed argument variants.

Index: dfuns.c
===================================================================
RCS file: /cvsroot/agd/server/src/dfuns.c,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -d -r1.19 -r1.20
--- dfuns.c	7 Jun 2004 15:40:52 -0000	1.19
+++ dfuns.c	8 Jun 2004 20:37:35 -0000	1.20
@@ -20,21 +20,27 @@
 extern list_t all_objects;
 extern time_t startup_time; /* for uptime() */
 
-void (**dfptr)(void);
+void (**dfptr)(void); /* Array for dfun function pointers. */
 
 void dfuns_init(void)
 {
-	int i, j, k;
+	int i, j/*, k*/;
 	int *args;
-	int numarg;
+	int num_arg;
 
 #include "dfdecl.h"
 
-	dfptr = xmalloc(sizeof(void(*)(void)) * NUM_DF);
+	dfptr = xmalloc(sizeof(void (*) (void)) * NUM_DF);
 	for(i=0;i<NUM_DF;i++) {
 		dfptr[i] = decl[i].fun;
-		numarg = 0;
-		args = NULL;
+
+		num_arg = decl[i].num_arg;
+		args = xmalloc(sizeof(int) * num_arg);
+
+		for(j=0;j<num_arg;j++) {
+			args[j] = decl[i].args[j];
+		}
+#if 0
 		for(j=0;j<decl[i].arglen;j++) {
 			if(j == 0)
 				j = 1;
@@ -49,7 +55,8 @@
 				}
 			}
 		}
-		define_id(decl[i].name, ID_DFUN, decl[i].ret, args, numarg);
+#endif
+		define_id(decl[i].name, ID_DFUN, decl[i].ret, args, num_arg);
 	}
 }
 
@@ -128,18 +135,6 @@
 	push_void();
 }
 
-#if 0
-void df_platform(void)
-{
-	push_string(PLATFORM, ST_STATIC);
-}
-
-void df_version(void)
-{
-	push_string(PACKAGE_VERSION, ST_STATIC);
-}
-#endif
-
 void df_destruct(void)
 {
 	destruct(fp->u.ob);