Mercurial > hg > octave-lyh
comparison scripts/time/datestr.m @ 7493:f1bce8450fd0
[mq]: tmp-patch
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Tue, 19 Feb 2008 03:36:08 -0500 |
parents | bd1168732c95 |
children | 4f9e8eeb2059 |
comparison
equal
deleted
inserted
replaced
7492:bd1168732c95 | 7493:f1bce8450fd0 |
---|---|
202 # guess, so we might be wrong | 202 # guess, so we might be wrong |
203 if (iscell (date) || columns (date) != 6) | 203 if (iscell (date) || columns (date) != 6) |
204 v = datevec (date, p); | 204 v = datevec (date, p); |
205 else | 205 else |
206 v = []; | 206 v = []; |
207 if columns (date) == 6 | 207 if (columns (date) == 6) |
208 ## make sure that the input really is a datevec | 208 ## Make sure that the input really is a datevec. |
209 maxdatevec = [inf 12 31 23 59 60]; | 209 maxdatevec = [Inf, 12, 31, 23, 59, 60]; |
210 for i = 1:numel (maxdatevec) | 210 for i = 1:numel (maxdatevec) |
211 if any (date(:,i) > maxdatevec(i)) | 211 if (any (date(:,i) > maxdatevec(i))) |
212 v = datevec (date, p); | 212 v = datevec (date, p); |
213 break; | 213 break; |
214 endif | 214 endif |
215 endfor | 215 endfor |
216 endif | 216 endif |
217 if isempty (v) | 217 if (isempty (v)) |
218 v = date; | 218 v = date; |
219 endif | 219 endif |
220 endif | 220 endif |
221 | 221 |
222 for i = 1:(rows (v)) | 222 for i = 1:(rows (v)) |