/media/sda-magnetic/david/compilerbau/pattern-matching/1th-episode/reg8.c

/*

+ ersetzt |
* ersetzt *

abcde
a+bcd
a*bcd
a(hajsd)h

zusammengefasst_und_folge a(b)c oder (b)a oder a(b)
zusammengefasst ()
folge abc 
wiederholungsoperator a* oder ()*
oder operator a|b oder a|() oder ()|() oder ()|a


zusammengefasst_und_folge   ::= zusammengfasst | zusammengfasst folge | folge
zusammengefasst             ::= ( zusammengefasst_und_folge )
folge                       ::= buchstabe zusammengefasst_und_folge


oder_operator               ::= wiederholungsoperator + wiederholungsoperator | wiederholungsoperator
wiederholungsoperator       ::= zusammengefasst_und_folge* | zusammengefasst_und_folge
zusammengefasst_und_folge   ::= zusammengfasst | zusammengfasst folge | folge
zusammengefasst             ::= ( oder_operator )
folge                       ::= buchstabe oder_operator

oder_operator               ^= or_operator 
wiederholungs_operator      ^= repeat_operator
zusammengefasst_und_folge   ^= summarized_and_followed
zusammengefasst             ^= summerized
folge                       ^= followed

a summerized
b followed 
ab summerized followed 
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

char expr [] = "a(((bc(d))lll)de(faaa))zzz";
int i = 0;

char gettoken () {
    return expr [i++];
}
void tokenback () {
    i--;
}

/*
aaaa
aaaaaa
aaaaaaa
aaaaaaaa()
*/

int stream ();
int followed ();
int compound ();

int realstream () {
    stream ();
    if (i < strlen (expr))
        realstream ();
}

int stream () {
    followed ();
    compound ();
    if (i < strlen (expr))
        stream ();
}

int followed () {
    int ch = gettoken ();
    if ((ch >= 'a') && (ch <= 'z')) {
        printf ("%c ", ch);
        followed ();
    }
    else
        tokenback ();
}

int compound () {
    if (gettoken () == '(') {
        stream ();
        if (gettoken () != ')') {
            fprintf (stderr, "fehler klammer vergessen %c %i\n", expr [i], i);
            exit (1);
        }
    }
    tokenback ();
}




int main (void) {
    realstream ();
}