Mercurial > octave-nkf

comparison scripts/time/datevec.m @ 7044:0064f7d6a451

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-10-21 20:28:03 by dbateman]
author dbateman
date Sun, 21 Oct 2007 20:28:03 +0000
parents 1f16da18d85d
children 69d45a4c7d94
comparison
equal deleted inserted replaced
7043:83400ec4eb1e 7044:0064f7d6a451
243 f = strrep (f, "HH", "%H"); 243 f = strrep (f, "HH", "%H");
244 endif 244 endif
245 f = strrep (f, "MM", "%M"); 245 f = strrep (f, "MM", "%M");
246 f = strrep (f, "SS", "%S"); 246 f = strrep (f, "SS", "%S");
247 247
248 ds, f
249 [tm, nc] = strptime (ds, f); 248 [tm, nc] = strptime (ds, f);
250 249
251 if (nc == length (ds) + 1) 250 if (nc == length (ds) + 1)
252 y = tm.year + 1900; m = tm.mon + 1; d = tm.mday; 251 y = tm.year + 1900; m = tm.mon + 1; d = tm.mday;
253 h = tm.hour; mi = tm.min; s = tm.sec + tm.usec / 1e6; 252 h = tm.hour; mi = tm.min; s = tm.sec + tm.usec / 1e6;