Mercurial > octave-nkf

comparison src/DLD-FUNCTIONS/time.cc @ 5823:080c08b192d8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-05-19 05:32:17 by jwe]
author jwe
date Fri, 19 May 2006 05:32:19 +0000
parents 6274256266d9
children 93c65f2a5668
comparison
equal deleted inserted replaced
5822:4fdc2515ebad 5823:080c08b192d8
89 octave_value retval; 89 octave_value retval;
90 90
91 if (args.length () == 0) 91 if (args.length () == 0)
92 retval = static_cast<double> (octave_time ()); 92 retval = static_cast<double> (octave_time ());
93 else 93 else
94 print_usage ("time"); 94 print_usage ();
95 95
96 return retval; 96 return retval;
97 } 97 }
98 98
99 DEFUN_DLD (gmtime, args, , 99 DEFUN_DLD (gmtime, args, ,
131 131
132 if (! error_state) 132 if (! error_state)
133 retval = octave_value (mk_tm_map (octave_gmtime (tmp))); 133 retval = octave_value (mk_tm_map (octave_gmtime (tmp)));
134 } 134 }
135 else 135 else
136 print_usage ("gmtime"); 136 print_usage ();
137 137
138 return retval; 138 return retval;
139 } 139 }
140 140
141 DEFUN_DLD (localtime, args, , 141 DEFUN_DLD (localtime, args, ,
173 173
174 if (! error_state) 174 if (! error_state)
175 retval = octave_value (mk_tm_map (octave_localtime (tmp))); 175 retval = octave_value (mk_tm_map (octave_localtime (tmp)));
176 } 176 }
177 else 177 else
178 print_usage ("localtime"); 178 print_usage ();
179 179
180 return retval; 180 return retval;
181 } 181 }
182 182
183 DEFUN_DLD (mktime, args, , 183 DEFUN_DLD (mktime, args, ,
212 } 212 }
213 else 213 else
214 error ("mktime: expecting structure argument"); 214 error ("mktime: expecting structure argument");
215 } 215 }
216 else 216 else
217 print_usage ("mktime"); 217 print_usage ();
218 218
219 return retval; 219 return retval;
220 } 220 }
221 221
222 DEFUN_DLD (strftime, args, , 222 DEFUN_DLD (strftime, args, ,
396 } 396 }
397 else 397 else
398 error ("strftime: expecting format string as first argument"); 398 error ("strftime: expecting format string as first argument");
399 } 399 }
400 else 400 else
401 print_usage ("strftime"); 401 print_usage ();
402 402
403 return retval; 403 return retval;
404 } 404 }
405 405
406 DEFUN_DLD (strptime, args, , 406 DEFUN_DLD (strptime, args, ,
437 } 437 }
438 else 438 else
439 error ("strptime: expecting string as first argument"); 439 error ("strptime: expecting string as first argument");
440 } 440 }
441 else 441 else
442 print_usage ("strptime"); 442 print_usage ();
443 443
444 return retval; 444 return retval;
445 } 445 }
446 446
447 /* 447 /*