Changeset 774 for trunk/AGRIF/LIB/WorkWithAllocatelist.c

Timestamp:

2007-12-18T17:45:53+01:00 (17 years ago)

Author:

rblod

Message:

Update Agrif, see ticket:#39

File:

• trunk/AGRIF/LIB/WorkWithAllocatelist.c (modified) (3 diffs)

trunk/AGRIF/LIB/WorkWithAllocatelist.c

@@ -31 +31 @@
 /* knowledge of the CeCILL-C license and that you accept its terms.           */
 /******************************************************************************/
-/* version 1.6                                                                */
+/* version 1.7                                                                */
 /******************************************************************************/
 #include <stdio.h>
@@ -57 +57 @@
          newvar = (listallocate *)malloc(sizeof(listallocate));
          strcpy(newvar->a_nomvar,nom);
+         Save_Length(nom,25);
          strcpy(newvar->a_subroutine,subroutinename);
+         Save_Length(subroutinename,26);
          strcpy(newvar->a_module,nommodule);
+         Save_Length(nommodule,27);
          newvar->suiv = NULL;
          List_Allocate_Var = newvar;
@@ -84 +87 @@
               newvar = (listallocate *)malloc(sizeof(listallocate));
               strcpy(newvar->a_nomvar,nom);
+              Save_Length(nom,25);
               strcpy(newvar->a_subroutine,subroutinename);
+              Save_Length(subroutinename,26);
               strcpy(newvar->a_module,nommodule);
+              Save_Length(nommodule,27);
               newvar->suiv = NULL;
               parcours->suiv = newvar;