Changeset 9267 for issm/trunk/src/m/model/WriteData.m

Timestamp:

08/11/11 07:14:04 (14 years ago)

Author:

Mathieu Morlighem

Message:

Fixed marshalling problem for watercolumn and added checks in WriteData

File:

• issm/trunk/src/m/model/WriteData.m (modified) (3 diffs)

issm/trunk/src/m/model/WriteData.m

@@ -22 +22 @@
 %Now, write the data itself.
 if     strcmpi(data_type,'Boolean'),% {{{
+        if(numel(data)~=1), error(['field ' field ' cannot be marshalled as it has more than one element!']); end
+
         %first write length of record
         fwrite(fid,1+4,'int');  %1 bool+code
@@ -32 +34 @@
         % }}}
 elseif strcmpi(data_type,'Integer'), % {{{
+        if(numel(data)~=1), error(['field ' field ' cannot be marshalled as it has more than one element!']); end
+
         %first write length of record
         fwrite(fid,4+4,'int');  %1 integer + code
@@ -42 +46 @@
         % }}}
 elseif strcmpi(data_type,'Double'), % {{{
+        if(numel(data)~=1), error(['field ' field ' cannot be marshalled as it has more than one element!']); end
+
         %first write length of record
         fwrite(fid,8+4,'int');  %1 double+code