]> matita.cs.unibo.it Git - helm.git/blob - helm/papers/use_case/stats/parse/parse_xmltree.c
ocaml 3.09 transition
[helm.git] / helm / papers / use_case / stats / parse / parse_xmltree.c
1 #include <stdio.h>
2 #include <sys/time.h>
3 #include <libxml/parser.h>
4
5 int
6 main(int argc, char *argv[])
7 {
8         struct timeval timing1, timing2;
9         gettimeofday(&timing1, NULL);
10         xmlParseFile(argv[1]);
11         gettimeofday(&timing2, NULL);
12         fprintf(stdout, "%d\n",
13                         ((timing2.tv_sec * 1000000 + timing2.tv_usec) -
14                          (timing1.tv_sec * 1000000 + timing1.tv_usec)) / 1000);
15         return 0;
16 }
17