mirrors/EQL5
1
Fork 0
mirror of https://gitlab.com/eql/EQL5.git synced 2025-12-11 12:51:25 -08:00
Code Issues Projects Releases Packages Wiki Activity

small revision of '.pro' files

Browse source
This commit is contained in:
polos 2017-03-04 11:41:32 +01:00
parent 3f3284519b
commit 0458ee21af
28 changed files with 135 additions and 81 deletions
Download patch file Download diff file Expand all files Collapse all files

58
examples/9-simple-lisp-editor/exe/main.cpp
View file

@ -1,29 +1,29 @@
#undef SLOT
#include <ecl/ecl.h>
#include <QApplication>
#include <QTextCodec>
#include "eql.h"
extern "C" void ini_app(cl_object);
int catch_all_qexec() {
int ret = 0;
CL_CATCH_ALL_BEGIN(ecl_process_env()) {
ret = QCoreApplication::exec(); }
CL_CATCH_ALL_END;
return ret; }
int main(int argc, char** argv) {
EQL::ini(argv);
QApplication qapp(argc, argv);
QTextCodec* utf8 = QTextCodec::codecForName("UTF-8");
QTextCodec::setCodecForLocale(utf8);
EQL eql;
eql.exec(ini_app);
return catch_all_qexec(); }
#undef SLOT
#include <ecl/ecl.h>
#include <QApplication>
#include <QTextCodec>
#include "eql.h"
extern "C" void ini_app(cl_object);
int catch_all_qexec() {
int ret = 0;
CL_CATCH_ALL_BEGIN(ecl_process_env()) {
ret = QCoreApplication::exec(); }
CL_CATCH_ALL_END;
return ret; }
int main(int argc, char** argv) {
EQL::ini(argv);
QApplication qapp(argc, argv);
QTextCodec* utf8 = QTextCodec::codecForName("UTF-8");
QTextCodec::setCodecForLocale(utf8);
EQL eql;
eql.exec(ini_app);
return catch_all_qexec(); }