Fix warnings in lfortran_intrinsics.c

Author: Shaikh-Ubaid

src/libasr/runtime/lfortran_intrinsics.c

@@ -1372,15 +1372,15 @@ LFORTRAN_API void _lfortran_read_int32(int32_t *p, int32_t unit_num)
     if (unit_num == -1) {
         // Read from stdin
         FILE *fp = fdopen(0, "r+");
-        fread(p, sizeof(int32_t), 1, fp);
+        (void)fread(p, sizeof(int32_t), 1, fp);
         fclose(fp);
         return;
     }
     if (!unit_to_file[unit_num]) {
         printf("No file found with given unit\n");
         exit(1);
     }
-    fread(p, sizeof(int32_t), 1, unit_to_file[unit_num]);
+    (void)fread(p, sizeof(int32_t), 1, unit_to_file[unit_num]);
 }
 
 LFORTRAN_API void _lfortran_read_char(char **p, int32_t unit_num)
@@ -1389,7 +1389,7 @@ LFORTRAN_API void _lfortran_read_char(char **p, int32_t unit_num)
         // Read from stdin
         *p = (char*)malloc(16);
         FILE *fp = fdopen(0, "r+");
-        fread(*p, sizeof(char), 16, fp);
+        (void)fread(*p, sizeof(char), 16, fp);
         fclose(fp);
         return;
     }
@@ -1398,7 +1398,7 @@ LFORTRAN_API void _lfortran_read_char(char **p, int32_t unit_num)
         exit(1);
     }
     *p = (char*)malloc(16);
-    fread(*p, sizeof(char), 16, unit_to_file[unit_num]);
+    (void)fread(*p, sizeof(char), 16, unit_to_file[unit_num]);
 }
 
 LFORTRAN_API char* _lpython_read(int64_t fd, int64_t n)