2 files changed, 5 insertions, 6 deletions
diff --git a/hl/fortran/src/H5LTfc.c b/hl/fortran/src/H5LTfc.c
index f2b1aca..12a8a3c 100755
--- a/hl/fortran/src/H5LTfc.c
+++ b/hl/fortran/src/H5LTfc.c
@@ -870,7 +870,7 @@ nh5ltget_dataset_info_c(hid_t_f *loc_id,
  ret = H5LTget_dataset_info(c_loc_id, c_name, c_dims, &c_classtype, &c_type_size);
 
  *type_class = c_classtype;
- *type_size = c_type_size;
+ *type_size = (size_t_f)c_type_size;
  for (i = 0; i < 32 ; i++) {
   dims[i] = (hsize_t_f) c_dims[i];
  }
@@ -1000,7 +1000,7 @@ nh5ltget_attribute_info_c(hid_t_f *loc_id,
  ret = H5LTget_attribute_info(c_loc_id,c_name,c_attrname,c_dims,&c_classtype,&c_type_size);
 
  *type_class = c_classtype;
- *type_size = c_type_size;
+ *type_size = (size_t_f)c_type_size;
  for (i = 0; i < 32 ; i++) {
   dims[i] = (hsize_t_f) c_dims[i];
  }
diff --git a/hl/fortran/src/H5TBfc.c b/hl/fortran/src/H5TBfc.c
index 68bade4..78866c8 100755
--- a/hl/fortran/src/H5TBfc.c
+++ b/hl/fortran/src/H5TBfc.c
@@ -65,7 +65,6 @@ nh5tbmake_table_c(int_f *namelen1,
  hsize_t c_nfields    = *nfields;
  hsize_t c_nrecords   = *nrecords;
  hsize_t c_chunk_size = *chunk_size;
- int     c_compress   = *compress;
  size_t  c_type_size  = *type_size;
  size_t  *c_field_offset;
  hid_t   *c_field_types; 
@@ -689,11 +688,11 @@ nh5tbget_field_info_c(hid_t_f *loc_id,
  HD5packFstring(tmp, _fcdtocp(field_names), (int)(c_lenmax*c_nfields));
 
 
-	*type_size = c_type_size;
+	*type_size = (size_t_f)c_type_size;
 	for (i=0; i < num_elem; i++) 
 	{
-		field_sizes[i]   = c_field_sizes[i];
-		field_offsets[i] = c_field_offsets[i];
+		field_sizes[i]   = (size_t_f)c_field_sizes[i];
+		field_offsets[i] = (size_t_f)c_field_offsets[i];
  }