run-ubasic.c-Dateireferenz

#include "../../modules/ubasic.h"
#include <stdio.h>
#include <assert.h>
#include <stdlib.h>

Include-Abhängigkeitsdiagramm für run-ubasic.c:

gehe zum Quellcode dieser Datei

Funktionen
int	main (int argc, char *argv[])

Variablen
static const char	program_static []

Dokumentation der Funktionen

int main	(	int	argc,
		char *	argv[]
	)

Definiert in Zeile 56 der Datei run-ubasic.c.

{
    char *program;
    if (argc == 1) {
        // buildin program
        program = (char *) program_static;
    } else {
        assert(argc == 2);
        FILE * f = fopen(argv[1], "rb");
        if (!f) {
            perror("Error opening file");
            exit(-1);
        }

        fseek(f,0, SEEK_END);
        int sz = ftell(f);
        fseek(f,0, SEEK_SET);
        program = (char *) malloc(sz+3);
        int szr = fread(program,1,sz, f);
        fclose(f);
        if (szr != sz) {
            perror("Error reading program");
        }
        printf("size: %d, read: %d \n", sz, szr); 
        program[sz] = '\n';
        program[sz+1] = 0;
    }

    printf("Program:\n%s\n=====================================\n\n", program);
    ubasic_init(program);
    do {
        ubasic_run();
    } while(!ubasic_finished());

    if (ubasic_error){
        const char *msg;
        if (ubasic_error >= UBASIC_E_ENDMARK) {
            msg = ubasic_errstrings[UBASIC_E_UNKNOWN_ERROR];
        } else {
            msg = ubasic_errstrings[ubasic_error];
        }
        fprintf(stderr, "Ubasic error near Line %d: %s\n", ubasic_linenumber(), msg);
    }

  return 0;
}

Variablen-Dokumentation

const char program_static[]

static

Initialisierung:

=
"sleep 1000\n\
 if a<1 then let a=2\n\
 if b<1 then let b=3\n\
 for s=1 to a\n\
   shoot\n\
   gosub \"incEv\"\n\
 next s\n\
 shoot\n\
end\n\
\n\
:incEv   \n\
\n\
for n=1 to b\n\
  click \"right\"\n\
next n\n\
return\n"

Definiert in Zeile 36 der Datei run-ubasic.c.