Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
follow old internal API change (why didn't it got detected before?)
[simgrid.git] / testsuite / gras / datadesc_usage.c
index 1273772..cd20ffc 100644 (file)
@@ -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 <stdio.h>
 #include "gras.h"
@@ -48,7 +52,7 @@ write_read(gras_datadesc_type_t type,void *src, void *dst,
     gras_socket_close(sock);
 
   if (direction == COPY)
-    gras_datadesc_copy(type, src, dst);
+    gras_datadesc_memcpy(type, src, dst);
 }
 
 void test_int(gras_socket_t sock, int direction);
@@ -390,7 +394,7 @@ void test_chain_list(gras_socket_t sock, int direction) {
 void test_graph(gras_socket_t sock, int direction) {
   chained_list_t *i, *j; 
 
-  INFO0("---- Test on graph (cyclique chained list) ----");
+  INFO0("---- Test on graph (cyclique chained list of 3 items) ----");
   /* init a value, exchange it and check its validity*/
   i = cons( 1151515, cons( -232362 , cons( 222552, NULL)));
   i->l->l->l = i;
@@ -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;