view tests/agcl/parsifal/test2.syn @ 9:60b08b68c750

Switch to static inline as an expedient build fix. Should probably set this up with working C99 inline but for the moment I don't have the energy.
author David A. Holland
date Mon, 30 May 2022 23:56:45 -0400
parents 13d2b8934445
children
line wrap: on
line source

{
#include <stdio.h>
}

[
  event driven
  distinguish keywords {'a-z' + 'A-Z' + '0-9'}
]

line $
 -> "if", '(', ~(eol + '(')?..., eol     =printf("if\n");
 -> "ifx",'(', ~(eol + '(')?..., eol     =printf("ifx\n");
 -> other stuff, eol

other stuff
 -> ~eol:c                        =printf("%c", c);
 -> other stuff, ~eol:c           =printf("%c", c);


eol = '\n'

{
  int main(void) {
    int c;
    init_test2();
    do {
      c = getchar();
      PCB.input_code = c;
      test2();
    } while ( c != '\n');
    return 0;
  }
}