code/main.felan


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

@import("basic.felan");

t :: (comptime formatter : string) macro -> string {
  i := 0;
  in := 0;
  opening := 0;
  while @cast(i,u64) < formatter.length {
    c := formatter[i];
    if c == '{' {
      if in == 0 {
        opening = i+1;
      }
      in += 1;
    } else if c == '}' {
      in -= 1;
      if in == 0{
        str := sub_string(formatter,opening,i);
        return str;
      } else if in < 0 {
        in = 0;
      }
    }
    i += 1;
  }
  return "a = '6';";
};

main :: () -> void {
  a := '2';
  // @insert("a = '3';a = '5';");
  s :: t("hello");
  @insert(s);
  print_char(a);
};