You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tdevelop/languages/ruby/app_templates/dcopservice/app.cpp

31 lines
928 B

#include <ruby.h>
#include <tqstring.h>
#include <tqfileinfo.h>
#include <kinstance.h>
#include <kstandarddirs.h>
int main(int argc, char **argv) {
KInstance * instance = new KInstance("%{APPNAMELC}");
TQString appdir = ::locate("data", "%{APPNAMELC}/main.rb", instance);
delete instance;
if (appdir.isNull()) {
tqFatal("Error: Can't find \"%{APPNAMELC}/main.rb\"\n");
}
TQFileInfo program(appdir);
char ** rubyargs = (char **) calloc(argc+4, sizeof(char *));
rubyargs[0] = strdup(argv[0]);
rubyargs[1] = strdup("-KU");
rubyargs[2] = strdup(TQString("-C%1").arg(program.dirPath()).latin1());
rubyargs[3] = strdup(TQString("-I%1").arg(program.dirPath()).latin1());
rubyargs[4] = strdup(program.fileName().latin1());
for (int i = 1; i < argc; i++) {
rubyargs[i+4] = argv[i];
}
ruby_init();
ruby_options(argc+4, rubyargs);
ruby_run();
}