+int GuileInterpreter::evaluate(const std::string& command,
+ std::ostream& stdout,
+ std::ostream& stderr,
+ std::string& result) {
+
+ return evaluateWithErrorHandling((SCM (*)(void *))scm_c_eval_string,
+ (void*)command.c_str(),
+ stdout, stderr, result);
+
+}
+
+int GuileInterpreter::loadFile(const std::string& filename,
+ std::ostream& stdout,
+ std::ostream& stderr,
+ std::string& result) {
+ LOG4CXX_DEBUG(logger, "Loading file \"" << filename << "\"");
+ evaluateWithErrorHandling((SCM (*)(void *))scm_c_primitive_load,
+ (void*)filename.c_str(),
+ stdout, stderr, result);
+ LOG4CXX_DEBUG(logger, "Finished file \"" << filename << "\"");