loa

Virtual machine for the Logic of Assumptions
git clone git://juanmeleiro.mat.br/loa
Log | Files | Refs

interpreter.c (455B)

      1 #include <stdio.h>
      2 
      3 #include "model.h"
      4 #include "zen.h"
      5 #include "tokenizer.h"
      6 
      7 int
      8 main(size_t argc, char **argv)
      9 {
     10 	garden *g = new_garden(schema(context));
     11 	FILE *src;
     12 
     13 	if (argc > 1) {
     14 		src = fopen(argv[1], "r");
     15 		if (!src) {
     16 			fprintf(stderr, "No such file: %s\n", argv[1]);
     17 			return 1;
     18 		}
     19 	} else {
     20 		src = stdin;
     21 	}
     22 
     23 	tokenizer *t = new_tokenizer(src);
     24 
     25 	while (!eos(t))
     26 		instruct(g, next_token(t));
     27 	display_garden(stdout, g);
     28 
     29 	return 0;
     30 }