mirror of
https://gitlab.com/eql/EQL5.git
synced 2025-12-20 01:00:26 -08:00
'Qt_EQL': in 'EQL::addObject' / 'define-qt-wrappers': also add methods of all super classes; make lispifying C names optional;
This commit is contained in:
parent
1758101cf2
commit
9738cdad85
9 changed files with 122 additions and 60 deletions
|
|
@ -19,13 +19,17 @@ int main(int argc, char* argv[]) {
|
|||
// the current package will be used (see above 'in-package');
|
||||
// pass 'true' as last argument to also call 'define-qt-wrappers'
|
||||
|
||||
EQL::addObject(main, "eql-user:*main-widget*");
|
||||
EQL::addObject(main, "eql-user:*main-widget*"); // add main
|
||||
|
||||
EQL::addObject(new Test(main), "*test*", true); // 'define-qt-wrappers'
|
||||
// note argument 3 (true): 'define-qt-wrappers'
|
||||
EQL::addObject(new Test(main), "*test*", true); // add 'Test'
|
||||
|
||||
EQL::eval("(load \"test.lisp\")"); // will start a REPL
|
||||
app.processEvents(); // needed for 'qlater' in 'test.lisp'
|
||||
// note argument 4 (false): do not lispify C function names
|
||||
EQL::addObject(new Test2(main), "*test-2*", true, false); // add 'Test2'
|
||||
|
||||
return 0; // no 'app.exec()' because of REPL
|
||||
EQL::eval("(load \"test.lisp\")"); // will start a REPL
|
||||
app.processEvents(); // needed for 'qlater' in 'test.lisp'
|
||||
|
||||
return 0; // no 'app.exec()' because of REPL
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue