Mercurial > octave-nkf
comparison src/ov-fcn-handle.cc @ 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 | 22e23bee74c8 |
comparison
equal
deleted
inserted
replaced
5822:4fdc2515ebad | 5823:080c08b192d8 |
---|---|
664 } | 664 } |
665 else | 665 else |
666 error ("functions: argument must be a function handle object"); | 666 error ("functions: argument must be a function handle object"); |
667 } | 667 } |
668 else | 668 else |
669 print_usage ("functions"); | 669 print_usage (); |
670 | 670 |
671 return retval; | 671 return retval; |
672 } | 672 } |
673 | 673 |
674 DEFUN (func2str, args, , | 674 DEFUN (func2str, args, , |
691 } | 691 } |
692 else | 692 else |
693 error ("func2str: expecting valid function handle as first argument"); | 693 error ("func2str: expecting valid function handle as first argument"); |
694 } | 694 } |
695 else | 695 else |
696 print_usage ("func2str"); | 696 print_usage (); |
697 | 697 |
698 return retval; | 698 return retval; |
699 } | 699 } |
700 | 700 |
701 DEFUN (str2func, args, , | 701 DEFUN (str2func, args, , |
714 retval = make_fcn_handle (nm); | 714 retval = make_fcn_handle (nm); |
715 else | 715 else |
716 error ("str2func: expecting string as first argument"); | 716 error ("str2func: expecting string as first argument"); |
717 } | 717 } |
718 else | 718 else |
719 print_usage ("str2func"); | 719 print_usage (); |
720 | 720 |
721 return retval; | 721 return retval; |
722 } | 722 } |
723 | 723 |
724 /* | 724 /* |