Mercurial > hg > octave-nkf
comparison src/load-save.cc @ 5823:080c08b192d8
[project @ 2006-05-19 05:32:17 by jwe]
author | jwe |
---|---|
date | Fri, 19 May 2006 05:32:19 +0000 |
parents | 1138ced03f14 |
children | 22e23bee74c8 |
comparison
equal
deleted
inserted
replaced
5822:4fdc2515ebad | 5823:080c08b192d8 |
---|---|
778 break; | 778 break; |
779 } | 779 } |
780 | 780 |
781 if (i == argc) | 781 if (i == argc) |
782 { | 782 { |
783 print_usage ("load"); | 783 print_usage (); |
784 return retval; | 784 return retval; |
785 } | 785 } |
786 | 786 |
787 std::string orig_fname = argv[i]; | 787 std::string orig_fname = argv[i]; |
788 | 788 |
1593 if (error_state) | 1593 if (error_state) |
1594 return retval; | 1594 return retval; |
1595 | 1595 |
1596 if (i == argc) | 1596 if (i == argc) |
1597 { | 1597 { |
1598 print_usage ("save"); | 1598 print_usage (); |
1599 return retval; | 1599 return retval; |
1600 } | 1600 } |
1601 | 1601 |
1602 if (save_as_floats && format == LS_ASCII) | 1602 if (save_as_floats && format == LS_ASCII) |
1603 { | 1603 { |
1627 | 1627 |
1628 // Guard against things like `save a*', which are probably mistakes... | 1628 // Guard against things like `save a*', which are probably mistakes... |
1629 | 1629 |
1630 else if (i == argc - 1 && glob_pattern_p (argv[i])) | 1630 else if (i == argc - 1 && glob_pattern_p (argv[i])) |
1631 { | 1631 { |
1632 print_usage ("save"); | 1632 print_usage (); |
1633 return retval; | 1633 return retval; |
1634 } | 1634 } |
1635 else | 1635 else |
1636 { | 1636 { |
1637 std::string fname = file_ops::tilde_expand (argv[i]); | 1637 std::string fname = file_ops::tilde_expand (argv[i]); |