Mercurial > octave
view examples/code/embedded.cc @ 25579:07c2c42f457e stable
doc: Miscellaneous documentation fixes all over the manual (bug #54288).
* embedded.cc, defaults.cc, error.cc, hex2num.cc, load-save.cc, integral2.m,
integral3.m, quad2d.m, warning_ids.m, decic.m, lsqnonneg.m, pqpnonneg.m,
bicg.m, betaincinv.m: Removal of duplicate words and redundant ')' and ';'
characters. Added missing '"', ')' characters. Renamed variables to match
other occurrences in docstring. Use '*' instead of 'x' for multiply.
Surround variables with @var{}.
author | Rik <rik@octave.org> |
---|---|
date | Wed, 11 Jul 2018 08:40:07 -0700 |
parents | 17a3567a7b01 |
children | de4bfeda8d9f |
line wrap: on
line source
#include <iostream> #include <octave/oct.h> #include <octave/octave.h> #include <octave/parse.h> #include <octave/interpreter.h> int main (void) { // Create interpreter. octave::interpreter interpreter; try { // Inhibit reading history file by calling // // interpreter.initialize_history (false); // Set custom load path here if you wish by calling // // interpreter.initialize_load_path (false); // Perform final initialization of interpreter, including // executing commands from startup files by calling // // int status interpreter.initialize (); // // if (! interpreter.initialized ()) // { // std::cerr << "Octave interpreter initialization failed!" // << std::endl; // exit (status); // } // // You may skip this step if you don't need to do anything // between reading the startup files and telling the interpreter // that you are ready to execute commands. // Tell the interpreter that we're ready to execute commands: int status = interpreter.execute (); if (status != 0) { std::cerr << "creating embedded Octave interpreter failed!" << std::endl; return status; } octave_idx_type n = 2; octave_value_list in; for (octave_idx_type i = 0; i < n; i++) in(i) = octave_value (5 * (i + 2)); octave_value_list out = octave::feval ("gcd", in, 1); if (out.length () > 0) std::cout << "GCD of [" << in(0).int_value () << ", " << in(1).int_value () << "] is " << out(0).int_value () << std::endl; else std::cout << "invalid\n"; } catch (const octave::exit_exception& ex) { std::cerr << "Octave interpreter exited with status = " << ex.exit_status () << std::endl; } catch (const octave::execution_exception&) { std::cerr << "error encountered in Octave evaluator!" << std::endl; } return 0; }