Mercurial > octave
comparison src/pr-output.cc @ 3683:505f5c35a2c9
[project @ 2000-06-27 20:19:47 by jwe]
author | jwe |
---|---|
date | Tue, 27 Jun 2000 20:20:46 +0000 |
parents | 19e1ac7359fb |
children | 9d8306640373 |
comparison
equal
deleted
inserted
replaced
3682:19e1ac7359fb | 3683:505f5c35a2c9 |
---|---|
1749 { | 1749 { |
1750 os << "sorry, printing char matrices not implemented yet\n"; | 1750 os << "sorry, printing char matrices not implemented yet\n"; |
1751 } | 1751 } |
1752 } | 1752 } |
1753 | 1753 |
1754 DEFUN (disp, args, , | |
1755 "-*- texinfo -*-\n\ | |
1756 @deftypefn {Built-in Function} {} disp (@var{x})\n\ | |
1757 Display the value of @var{x}. For example,\n\ | |
1758 \n\ | |
1759 @example\n\ | |
1760 disp (\"The value of pi is:\"), disp (pi)\n\ | |
1761 \n\ | |
1762 @print{} the value of pi is:\n\ | |
1763 @print{} 3.1416\n\ | |
1764 @end example\n\ | |
1765 \n\ | |
1766 @noindent\n\ | |
1767 Note that the output from @code{disp} always ends with a newline.\n\ | |
1768 @end deftypefn") | |
1769 { | |
1770 octave_value_list retval; | |
1771 | |
1772 int nargin = args.length (); | |
1773 | |
1774 if (nargin == 1) | |
1775 args(0).print (octave_stdout); | |
1776 else | |
1777 print_usage ("disp"); | |
1778 | |
1779 return retval; | |
1780 } | |
1781 | |
1782 static void | 1754 static void |
1783 init_format_state (void) | 1755 init_format_state (void) |
1784 { | 1756 { |
1785 free_format = false; | 1757 free_format = false; |
1786 plus_format = false; | 1758 plus_format = false; |