source: issm/oecreview/Archive/23390-24306/ISSM-23577-23578.diff

Last change on this file was 24307, checked in by Mathieu Morlighem, 6 years ago

NEW: adding Archive/23390-24306
File size: 977 bytes
RevLine 
[24307]1Index: ../trunk-jpl/src/c/classes/IoModel.cpp
2===================================================================
3--- ../trunk-jpl/src/c/classes/IoModel.cpp (revision 23577)
4+++ ../trunk-jpl/src/c/classes/IoModel.cpp (revision 23578)
5@@ -453,8 +453,8 @@
6 int *types = NULL;
7
8 /*Initialize array detecting whether data[i] is an independent AD mode variable: */
9- this->FetchData(&autodiff,"md.autodiff.isautodiff");
10- this->FetchData(&iscontrol,"md.inversion.iscontrol");
11+ this->FetchConstants(&autodiff,"md.autodiff.isautodiff");
12+ this->FetchConstants(&iscontrol,"md.inversion.iscontrol");
13
14 if(trace || (autodiff && !iscontrol)){
15
16@@ -2536,6 +2536,9 @@
17 if(strncmp(data_name,mddot,3)!=0){
18 _error_("Cannot fetch \""<<data_name<<"\" does not start with \""<<mddot<<"\"");
19 }
20+ if(fid==NULL){
21+ _error_("Cannot fetch \""<<data_name<<"\": file pointer invalid ");
22+ }
23
24 /*Go find in the binary file, the position of the data we want to fetch: */
25 if(my_rank==0){
Note: See TracBrowser for help on using the repository browser.