MonetDB: default - Make debugging function visible

[Martin Kersten]

Changeset: 9f29f6010079 for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=9f29f6010079
Modified Files:
        clients/mapiclient/eventparser.c
        clients/mapiclient/eventparser.h
Branch: default
Log Message:

Make debugging function visible


diffs (53 lines):

diff --git a/clients/mapiclient/eventparser.c b/clients/mapiclient/eventparser.c
--- a/clients/mapiclient/eventparser.c
+++ b/clients/mapiclient/eventparser.c
@@ -70,11 +70,22 @@ stripQuotes(char *currentquery)
                        *q =0;
        return qry;
 }
+ 
+
+void
+eventdump(void)
+{      int i;
+       fprintf(stderr,"Event analysis\n");
+       for(i=0; i < malargc; i++)
+               fprintf(stderr,"arg[%d] %s %s %d\n",i,malarguments[i], 
maltypes[i], malcount[i]);
+       for(i=0; i < malvartop; i++)
+               fprintf(stderr,"var[%d] %s\n",i,malvariables[i]);
+}
 
 static void
 parseArguments(char *call, int m)
 {
-       int i, argc= m < 0? -1:0;
+       int argc= m < 0? -1:0;
        char  *c = call, *l, ch;
        char *v, *w;
        
@@ -187,12 +198,8 @@ parseArguments(char *call, int m)
                if (*c == 0 || *c ==')' )
                        break;
        }
-       if( debug){
-               for(i=0; i < malargc; i++)
-                       fprintf(stderr,"arg[%d] %s %s %d\n",i,malarguments[i], 
maltypes[i], malcount[i]);
-               for(i=0; i < malvartop; i++)
-                       fprintf(stderr,"var[%d] %s\n",i,malvariables[i]);
-       }
+       if( debug)
+               eventdump();
 }
 
 int
diff --git a/clients/mapiclient/eventparser.h b/clients/mapiclient/eventparser.h
--- a/clients/mapiclient/eventparser.h
+++ b/clients/mapiclient/eventparser.h
@@ -98,6 +98,7 @@ extern int debug;
 extern char *monetdb_characteristics;
 
 extern void clearArguments(void);
+extern void eventdump(void);
 extern int eventparser(char *row, EventRecord *ev);
 extern char *stripQuotes(char *currentquery);
 #endif /*_EVENT_PARSER_*/
_______________________________________________
checkin-list mailing list
checkin-list@monetdb.org
https://www.monetdb.org/mailman/listinfo/checkin-list