Fix bugs in mget/mput with integer 32 (follow I0f8609105b450a05489c230a6196c95bbf10677b) 84/11384/2
Calixte DENIZET [Wed, 24 Apr 2013 13:08:45 +0000 (15:08 +0200)]
Change-Id: I6c82ac5cb87466df9db4305ab386aa791b7d73e2

scilab/modules/fileio/src/c/mget.c
scilab/modules/fileio/src/c/mput.c

index 09b95dc..e46e1b4 100644 (file)
@@ -86,7 +86,7 @@ void C2F(mgetnc) (int *fd, void *res, int *n1, char *type, int *ierr)
     switch (type[0])
     {
         case 'i':
-            MGET_GEN_NC(long, c1);
+            MGET_GEN_NC(int, c1);
             break;
 
         case 'l':
@@ -113,7 +113,7 @@ void C2F(mgetnc) (int *fd, void *res, int *n1, char *type, int *ierr)
             switch (c1)
             {
                 case 'i':
-                    MGET_GEN_NC(unsigned long, c2);
+                    MGET_GEN_NC(unsigned int, c2);
                     break;
 
                 case 'l':
@@ -177,7 +177,7 @@ void mget2(FILE * fa, int swap2, double *res, int n, char *type, int *ierr)
     switch (type[0])
     {
         case 'i':
-            MGET_GEN(long, c1);
+            MGET_GEN(int, c1);
             break;
 
         case 'l':
@@ -204,7 +204,7 @@ void mget2(FILE * fa, int swap2, double *res, int n, char *type, int *ierr)
             switch (c1)
             {
                 case 'i':
-                    MGET_GEN(unsigned long, c2);
+                    MGET_GEN(unsigned int, c2);
                     break;
 
                 case 'l':
index 12dfba1..5aee538 100644 (file)
@@ -87,7 +87,7 @@ void C2F(mputnc) (int *fd, void * res, int *n1, char *type, int *ierr)
     switch ( type[0] )
     {
         case 'i' :
-            MPUT_GEN_NC(long, c1);
+            MPUT_GEN_NC(int, c1);
             break;
         case 'l' :
             MPUT_GEN_NC(long long, c1);
@@ -108,7 +108,7 @@ void C2F(mputnc) (int *fd, void * res, int *n1, char *type, int *ierr)
             switch ( c1 )
             {
                 case 'i' :
-                    MPUT_GEN_NC(unsigned long, c2);
+                    MPUT_GEN_NC(unsigned int, c2);
                     break;
                 case 'l' :
                     MPUT_GEN_NC(unsigned long long, c2);
@@ -189,7 +189,7 @@ void mput2 (FILE *fa, int swap2, double *res, int n, char *type, int *ierr)
     switch ( type[0] )
     {
         case 'i' :
-            MPUT_GEN(long, c1);
+            MPUT_GEN(int, c1);
             break;
         case 'l' :
             MPUT_GEN(long long, c1);
@@ -210,7 +210,7 @@ void mput2 (FILE *fa, int swap2, double *res, int n, char *type, int *ierr)
             switch ( c1 )
             {
                 case 'i' :
-                    MPUT_GEN(unsigned long, c2);
+                    MPUT_GEN(unsigned int, c2);
                     break;
                 case 'l' :
                     MPUT_GEN(unsigned long long, c2);