comparison src/help.cc @ 3168:1c267910655d

[project @ 1998-04-19 01:22:38 by jwe]
author jwe
date Sun, 19 Apr 1998 01:23:10 +0000
parents 45490c020e47
children 9580887dd160
comparison
equal deleted inserted replaced
3167:d609b993be3b 3168:1c267910655d
394 } 394 }
395 395
396 void 396 void
397 additional_help_message (ostream& os) 397 additional_help_message (ostream& os)
398 { 398 {
399 #if defined (USE_GNU_INFO)
400
401 if (! Vsuppress_verbose_help_message) 399 if (! Vsuppress_verbose_help_message)
402 os << "\n\ 400 os << "\n\
403 Additional help for builtin functions, operators, and variables\n\ 401 Additional help for builtin functions, operators, and variables\n\
404 is available in the on-line version of the manual. Use the command\n\ 402 is available in the on-line version of the manual. Use the command\n\
405 `help -i <topic>' to search the manual index.\n"; 403 `help -i <topic>' to search the manual index.\n";
406
407 #endif
408 404
409 if (! Vsuppress_verbose_help_message) 405 if (! Vsuppress_verbose_help_message)
410 os << "\n\ 406 os << "\n\
411 Help and information about Octave is also available on the WWW\n\ 407 Help and information about Octave is also available on the WWW\n\
412 at http://www.che.wisc.edu/octave/octave.html and via the\n\ 408 at http://www.che.wisc.edu/octave/octave.html and via the\n\
575 571
576 names.list_in_columns (octave_stdout); 572 names.list_in_columns (octave_stdout);
577 } 573 }
578 } 574 }
579 } 575 }
580
581 #if defined (USE_GNU_INFO)
582 576
583 static int 577 static int
584 try_info (const string& nm) 578 try_info (const string& nm)
585 { 579 {
586 int status = 0; 580 int status = 0;
652 } 646 }
653 } 647 }
654 } 648 }
655 } 649 }
656 650
657 #else
658
659 static void
660 help_from_info (const string_vector&, int, int)
661 {
662 message ("help", "Info help is not available in this version of Octave");
663 }
664
665 #endif
666
667 static bool 651 static bool
668 help_from_list (ostream& os, const help_list *list, 652 help_from_list (ostream& os, const help_list *list,
669 const string& nm, int usage) 653 const string& nm, int usage)
670 { 654 {
671 const char *name; 655 const char *name;
736 } 720 }
737 721
738 additional_help_message (octave_stdout); 722 additional_help_message (octave_stdout);
739 } 723 }
740 724
741 #if defined (USE_GNU_INFO)
742 #define HELP_DOC_STRING \
743 "help [-i] [topic ...]\n\nprint cryptic yet witty messages"
744 #else
745 #define HELP_DOC_STRING \
746 "help [topic ...]\n\nprint cryptic yet witty messages"
747 #endif
748
749 DEFUN_TEXT (help, args, , 725 DEFUN_TEXT (help, args, ,
750 HELP_DOC_STRING) 726 "help [-i] [topic ...]\n\
727 \n\
728 print cryptic yet witty messages")
751 { 729 {
752 octave_value_list retval; 730 octave_value_list retval;
753 731
754 int argc = args.length () + 1; 732 int argc = args.length () + 1;
755 733