git » unicorn-sparkle-basic.git » master » tree

[master] / main.c 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
/*
 * This file is part of Unicorn Sparkle Basic and is released under
 * CC0 1.0 Universal License.  See LICENSE.txt file or
 * https://creativecommons.org/publicdomain/zero/1.0/ for full license
 * text.
 */

#include "lines.h"
#include <stdio.h>

/* TODO */
/* env hashtable */
/* eval_expr - returns a TYPE */
/* eval_stmt - returns void but optionally sets jump dest */
void eval_stmt(struct node_tag *node) {
  /* switch (node->type) { */
  /*   case  */
  /* } */
}

void run(struct node_tag **lines) {
}

void read_loop() {
  struct node_tag *line;
  struct node_tag **lines = vector_create();
  while (1) {
    if ((line = read_line_stdin("🦄 "))) {
      switch (line->type) {
      case NODE_COMMAND_RUN:
        printf("RUN command entered\n");
        printf("found = %zu\n", lines_find_idx(lines, 99));
        break;
      case NODE_NUMBERED_LINE:
        printf("linum: %g\n", line->data.line.linum);
        lines_insert(&lines, line);
        break;
      default:
        /* die */
      }
      /* lines_print(lines); */
    }
  }
}

int main() {
  printf("✨ Welcome to Unicorn Sparkle Basic! ✨\n");
  read_loop();
  return 0;
}