- while (-1 != (t = PSI_LexerScan(L))) {
- if (!(T = PSI_TokenAlloc(L, t))) {
- break;
- }
-
- if (TRACE) {
- printf("# Token: <%s>(%d)\n", T->text, t);
- }
-
- PSI_Parser(P, t, T, L);
+ if (!PSI_ParserInit(&P, argv[1], flags)) {
+ perror("Failer to init parser");
+ return 1;