/* This program is free software; you can redistribute it and/or modify it
* under the terms of the license (GNU LGPL) which comes with this package. */
-#include "simgrid_config.h" /* FILE for getline */
-
/* specific to Borland Compiler */
#ifdef __BORLANDDC__
#pragma hdrstop
#endif
+#include "simgrid_config.h" //For getline, keep that include first
+
#include "tesh.h"
#include "xbt.h"
}
}
-static void handle_suite(const char *filename, FILE * FICIN)
+static void handle_suite(const char *filename, FILE * IN)
{
size_t len;
int blankline;
buff = xbt_strbuff_new();
rctx = rctx_new();
- while (getline(&line, &len, FICIN) != -1) {
+ while (getline(&line, &len, IN) != -1) {
line_num++;
/* Count the line length while checking wheather it's blank */
int main(int argc, char *argv[])
{
- FILE *FICIN = NULL;
+ FILE *IN = NULL;
int i;
char *suitename = NULL;
struct sigaction newact;
exit(1);
}
char *eq = strchr(argv[i+1], '=');
- xbt_assert1(eq,"The argument of --setenv must contain a '=' (got %s instead)",argv[i+1]);
+ xbt_assert(eq,"The argument of --setenv must contain a '=' (got %s instead)",argv[i+1]);
char *key = bprintf("%.*s", (int) (eq - argv[i+1]), argv[i+1]);
xbt_dict_set(env, key, xbt_strdup(eq + 1), xbt_free_f);
XBT_INFO("setting environment variable '%s' to '%s'", key, eq+1);
XBT_INFO("Test suite `%s'", suitename);
testsuite_name = suitename;
- FICIN = fopen(argv[i], "r");
- if (!FICIN) {
+ IN = fopen(argv[i], "r");
+ if (!IN) {
perror(bprintf("Impossible to open the suite file `%s'", argv[i]));
XBT_ERROR("Test suite `%s': NOK (system error)", testsuite_name);
rctx_armageddon(rctx, 1);
}
- handle_suite(suitename, FICIN);
+ handle_suite(suitename, IN);
rctx_wait_bg();
- fclose(FICIN);
+ fclose(IN);
XBT_INFO("Test suite `%s' OK", suitename);
free(suitename);
}