From: cherierm Date: Thu, 21 Dec 2006 15:01:52 +0000 (+0000) Subject: add pragmas for builder6 compatibility X-Git-Tag: v3.3~2339 X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/commitdiff_plain/28de1ff76a78ba4d87ea61d5d9fce01c6d035a18?ds=inline add pragmas for builder6 compatibility git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/simgrid/simgrid/trunk@3020 48e7efb5-ca39-0410-a469-dd3cf9ba447f --- diff --git a/testsuite/gras/datadesc_usage.c b/testsuite/gras/datadesc_usage.c index d8111415dc..09b0e60c16 100644 --- a/testsuite/gras/datadesc_usage.c +++ b/testsuite/gras/datadesc_usage.c @@ -6,6 +6,10 @@ /* 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. */ + +#ifdef __BORLANDC__ +#pragma hdrstop +#endif #include #include "gras.h" @@ -598,6 +602,10 @@ void test_clause(gras_socket_t sock, int direction) { free(i); } +#ifdef __BORLANDC__ +#pragma argsused +#endif + int main(int argc,char *argv[]) { gras_socket_t sock=NULL; int direction = RW; diff --git a/testsuite/gras/trp_tcp_client.c b/testsuite/gras/trp_tcp_client.c index bb58f8fa74..55aa60268e 100644 --- a/testsuite/gras/trp_tcp_client.c +++ b/testsuite/gras/trp_tcp_client.c @@ -6,6 +6,10 @@ /* 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. */ + +#ifdef __BORLANDC__ +#pragma hdrstop +#endif #include #include "gras.h" diff --git a/testsuite/gras/trp_tcp_server.c b/testsuite/gras/trp_tcp_server.c index c8f7215c2f..dfbc31d90a 100644 --- a/testsuite/gras/trp_tcp_server.c +++ b/testsuite/gras/trp_tcp_server.c @@ -6,6 +6,10 @@ /* 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. */ + +#ifdef __BORLANDC__ +#pragma hdrstop +#endif #include #include "gras.h" @@ -13,6 +17,10 @@ XBT_LOG_NEW_CATEGORY(test,"Logging for this test"); +#ifdef __BORLANDC__ +#pragma argsused +#endif + int main(int argc,char *argv[]) { gras_socket_t sock, conn; char data_recv[256]; diff --git a/testsuite/surf/maxmin_bench.c b/testsuite/surf/maxmin_bench.c index 0002161543..ee7e2e100c 100644 --- a/testsuite/surf/maxmin_bench.c +++ b/testsuite/surf/maxmin_bench.c @@ -7,6 +7,11 @@ /* 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. */ +#ifdef __BORLANDC__ +#pragma hdrstop +#endif + + #include #include #include "xbt/xbt_portability.h" @@ -69,6 +74,10 @@ void test(int nb_cnst, int nb_var, int nb_elem) free(used); } +#ifdef __BORLANDC__ +#pragma argsused +#endif + int main(int argc, char **argv) { diff --git a/testsuite/surf/maxmin_usage.c b/testsuite/surf/maxmin_usage.c index 96f2703f5f..ba7204064b 100644 --- a/testsuite/surf/maxmin_usage.c +++ b/testsuite/surf/maxmin_usage.c @@ -7,6 +7,10 @@ /* 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. */ +#ifdef __BORLANDC__ +#pragma hdrstop +#endif + #include #include #include "surf/maxmin.h" @@ -113,7 +117,11 @@ void test2(void) DEBUG0("\n"); lmm_system_free(Sys); -} +} + +#ifdef __BORLANDC__ +#pragma argsused +#endif int main(int argc, char **argv) { diff --git a/testsuite/surf/surf_usage.c b/testsuite/surf/surf_usage.c index 3a104fb0ee..7296f609e4 100644 --- a/testsuite/surf/surf_usage.c +++ b/testsuite/surf/surf_usage.c @@ -6,6 +6,10 @@ /* 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. */ + +#ifdef __BORLANDC__ +#pragma hdrstop +#endif #include #include "surf/surf.h" @@ -133,6 +137,10 @@ void test(char *platform) DEBUG0("Simulation Terminated\n"); } +#ifdef __BORLANDC__ +#pragma argsused +#endif + int main(int argc, char **argv) { surf_init(&argc, argv); /* Initialize some common structures */ diff --git a/testsuite/surf/surf_usage2.c b/testsuite/surf/surf_usage2.c index 2adbbadd25..e3af4cf458 100644 --- a/testsuite/surf/surf_usage2.c +++ b/testsuite/surf/surf_usage2.c @@ -6,6 +6,9 @@ /* 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. */ +#ifdef __BORLANDC__ +#pragma hdrstop +#endif #include #include "surf/surf.h" @@ -105,6 +108,10 @@ void test(char *platform) } +#ifdef __BORLANDC__ +#pragma argsused +#endif + int main(int argc, char **argv) { surf_init(&argc, argv); /* Initialize some common structures */ diff --git a/testsuite/surf/trace_usage.c b/testsuite/surf/trace_usage.c index 9232409dd5..5082646bc7 100644 --- a/testsuite/surf/trace_usage.c +++ b/testsuite/surf/trace_usage.c @@ -6,6 +6,9 @@ /* 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. */ +#ifdef __BORLANDC__ +#pragma hdrstop +#endif #include #include @@ -46,6 +49,10 @@ void test(void) free(host_A); } +#ifdef __BORLANDC__ +#pragma argsused +#endif + int main(int argc, char **argv) { diff --git a/testsuite/xbt/context_usage.c b/testsuite/xbt/context_usage.c index 3a8f22fd53..d216860567 100644 --- a/testsuite/xbt/context_usage.c +++ b/testsuite/xbt/context_usage.c @@ -1,3 +1,7 @@ +#ifdef __BORLANDC__ +#pragma hdrstop +#endif + #include "xbt/context.h" #include "xbt/fifo.h" #include "stdlib.h" @@ -69,6 +73,10 @@ int fC(int argc, char** argv) return 0; } +#ifdef __BORLANDC__ +#pragma argsused +#endif + int main(int argc, char** argv) { xbt_context_t context = NULL; diff --git a/testsuite/xbt/graphxml_usage.c b/testsuite/xbt/graphxml_usage.c index 89255a7640..cf89b3cb6b 100644 --- a/testsuite/xbt/graphxml_usage.c +++ b/testsuite/xbt/graphxml_usage.c @@ -6,7 +6,10 @@ /* 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. */ - +#ifdef __BORLANDC__ + #pragma hdrstop + #endif + #include "xbt/module.h" #include "xbt/sysdep.h" #include "xbt/graph.h" @@ -147,6 +150,10 @@ void test(char *graph_file) xbt_graph_free_graph(graph, free_label, NULL, NULL); } +#ifdef __BORLANDC__ +#pragma argsused +#endif + int main(int argc, char **argv) { xbt_init(&argc, argv); if (argc == 1) { diff --git a/testsuite/xbt/heap_bench.c b/testsuite/xbt/heap_bench.c index b3706d7fac..ca64029dc3 100644 --- a/testsuite/xbt/heap_bench.c +++ b/testsuite/xbt/heap_bench.c @@ -6,6 +6,10 @@ /* 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. */ + + #ifdef __BORLANDC__ + #pragma hdrstop + #endif #include #include @@ -15,7 +19,12 @@ #define MAX_TEST 1000000 +#ifdef __BORLANDC__ +int _XBT_CALL compare_double(const void *a, const void *b); +#else int compare_double(const void *a, const void *b); +#endif + void test_heap_validity(int size); void test_heap_mean_operation(int size); void test_reset_heap(xbt_heap_t heap,int size); @@ -103,6 +112,10 @@ void test_reset_heap(xbt_heap_t heap,int size) } +#ifdef __BORLANDC__ +#pragma argsused +#endif + int main(int argc, char **argv) { int size; diff --git a/testsuite/xbt/log_usage.c b/testsuite/xbt/log_usage.c index 81f004f7e3..180dd4e5da 100644 --- a/testsuite/xbt/log_usage.c +++ b/testsuite/xbt/log_usage.c @@ -6,12 +6,22 @@ /* 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. */ + +#ifdef __BORLANDC__ +#pragma hdrstop +#endif #include "gras.h" + + XBT_LOG_NEW_DEFAULT_SUBCATEGORY(test, top,"Logging specific to this test"); XBT_LOG_NEW_CATEGORY(top,"Useless test channel"); +#ifdef __BORLANDC__ +#pragma argsused +#endif + int main(int argc, char **argv) { xbt_init(&argc,argv);