- QString text = line->text();
- line->clear();
- LOG4CXX_INFO(logger, "Evaluating String \"" << text.toStdString() << "\"");
- browser->append(QString("> ") + text);
-
- SCM result_obj = scm_internal_catch(SCM_BOOL_T,
- (SCM (*)(void *))scm_c_eval_string,
- (void*)text.toStdString().c_str(),
- handler, NULL);
- SCM result_str = scm_object_to_string(result_obj, SCM_UNDEFINED);
+ QString text = line->text();
+ line->clear();
+ LOG4CXX_INFO(logger, "Evaluating String \"" << text.toStdString() << "\"");
+ browser->append(QString("> ") + text);