Ignore:
Timestamp:
10/10/16 16:01:11 (8 years ago)
Author:
mhnguyen
Message:

Reducing length of line of auto-generate Fortran interface

+) Break line into smaller ones to make sure each line is not longer than 132 character

Test
+) Local with gcc4.8
+) Compilation passed

File:
1 edited

Legend:

Unmodified
Added
Removed
  • XIOS/trunk/src/attribute_map.cpp

    r778 r966  
    629629 
    630630         oss << std::endl << iendl; 
    631          oss << "CALL xios(get_" << className << "_handle)(" << className << "_id," << className << "_hdl)" << iendl; 
     631         oss << "CALL xios(get_" << className << "_handle) &" << iendl; 
     632         oss << "(" << className << "_id," << className << "_hdl)" << iendl; 
    632633         oss << "CALL xios(set_" << className << "_attr_hdl_)   &" << iendl; 
    633634 
     
    693694 
    694695         oss << std::endl << iendl; 
    695          oss << "CALL xios(get_" << className << "_handle)(" << className << "_id," << className << "_hdl)" << iendl; 
     696         oss << "CALL xios(get_" << className << "_handle) &" << iendl; 
     697         oss << "(" << className << "_id," << className << "_hdl)" << iendl; 
    696698         oss << "CALL xios(get_" << className << "_attr_hdl_)   &" << iendl; 
    697699 
     
    757759 
    758760         oss << std::endl << iendl; 
    759          oss << "CALL xios(get_" << className << "_handle)(" << className << "_id," << className << "_hdl)" << iendl; 
     761         oss << "CALL xios(get_" << className << "_handle) &" << iendl; 
     762         oss << "(" << className << "_id," << className << "_hdl)" << iendl; 
    760763         oss << "CALL xios(is_defined_" << className << "_attr_hdl_)   &" << iendl; 
    761764 
Note: See TracChangeset for help on using the changeset viewer.