Mercurial > octave-nkf
comparison mk-opts.pl @ 5823:080c08b192d8
[project @ 2006-05-19 05:32:17 by jwe]
author | jwe |
---|---|
date | Fri, 19 May 2006 05:32:19 +0000 |
parents | ace8d8d26933 |
children | 55411ecc8d8b |
comparison
equal
deleted
inserted
replaced
5822:4fdc2515ebad | 5823:080c08b192d8 |
---|---|
675 } | 675 } |
676 | 676 |
677 print " }\n\n"; | 677 print " }\n\n"; |
678 } | 678 } |
679 | 679 |
680 print "print_usage (\"$opt_fcn_name\", true, buf.str ()); | 680 print "print_usage (); |
681 }\n\n"; | 681 }\n\n"; |
682 } | 682 } |
683 | 683 |
684 sub emit_set_functions | 684 sub emit_set_functions |
685 { | 685 { |
872 } | 872 } |
873 else | 873 else |
874 error (\"$opt_fcn_name: expecting keyword as first argument\"); | 874 error (\"$opt_fcn_name: expecting keyword as first argument\"); |
875 } | 875 } |
876 else | 876 else |
877 print_usage (\"$opt_fcn_name\"); | 877 print_usage (); |
878 | 878 |
879 return retval; | 879 return retval; |
880 }\n"; | 880 }\n"; |
881 } | 881 } |
882 | 882 |