Example #1
0
int setup_basic(struct environ *env) {
	FILE *null, *basic;
	null = fopen("/dev/null", "w");
	basic = fopen("/usr/local/share/si/setup.scm", "r");
	if (!null || !basic)
		return 1;

	interpret_file(basic, null, null, env);
	return 0;
}
Example #2
0
QGCodeViewer::QGCodeViewer(QWidget *parent) : QGLViewer(parent)  
{
  
    setAttribute(Qt::WA_DeleteOnClose);

    lines.reserve(20000);
    g2m = new g2m::g2m(); // g-code interpreter

    connect( this, SIGNAL( setGcodeFile(QString) ),     g2m, SLOT( setFile(QString)) );
    connect( this, SIGNAL( setRS274(QString) ),         g2m, SLOT( setInterp(QString)) );
    connect( this, SIGNAL( setToolTable(QString) ),     g2m, SLOT( setToolTable(QString)) );
    connect( this, SIGNAL( interpret() ),               g2m, SLOT( interpret_file() ) );
    
    connect( g2m, SIGNAL( signalCanonLine(canonLine*) ), this, SLOT( appendCanonLine(canonLine*) ));
    connect( g2m, SIGNAL( signalNCend() ),               this, SLOT( update() ) );
    connect( g2m, SIGNAL( signalError(QString) ),        this, SLOT( update() ) );
    
    home_dir = QStandardPaths::locate(QStandardPaths::HomeLocation, QString(), QStandardPaths::LocateDirectory);
    openFile = "";
}
Example #3
0
int main (int argc, char** argv) {
	struct sigaction act, oact; // for handling ctrl-c
	act.sa_handler = sig_handler;
	sigemptyset(&act.sa_mask);
	act.sa_flags = 0;
	sigaction(SIGINT, &act, &oact);
    
    if (1 == argc) {
        repl();
    } else {
        struct byte_array *args = arg2ba(argc, argv);
        struct byte_array *path = byte_array_from_string(argv[1]);

        interpret_file(path, args);

        if (NULL != args) {
            byte_array_del(args);
        }
        byte_array_del(path);
    }
}