Files
cmake/Tests/FindOctave/Test/interp_main.cpp
T
Peter Stroia-Williams 6725975bd8 FindOctave: Add target for octinterp
This change adds the Octave::Octinterp target to make the octinterp
library available without users having to resort to using the
Octave_INTERP_LIBRARY variable.
2019-02-08 20:34:30 +00:00

27 lines
711 B
C++

#include <iostream>
#include <oct.h>
#include <octave.h>
#include <parse.h>
#include <toplev.h>
int main(void)
{
string_vector argv(2);
argv(0) = "embedded";
argv(1) = "-q";
try {
octave_main(2, argv.c_str_vec(), 1);
octave_value_list in;
in(0) = 72.0;
const octave_value_list result = feval("sqrt", in);
std::cout << "result is " << result(0).scalar_value() << std::endl;
clean_up_and_exit(0);
} 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;
}
}