/* c code generated by "tr/translate.c.pss" */ /* note: this c engine cannot handle unicode! */ #include #include #include #include #include "colours.h" #include "tapecell.h" #include "tape.h" #include "buffer.h" #include "charclass.h" #include "command.h" #include "parameter.h" #include "instruction.h" #include "labeltable.h" #include "program.h" #include "machine.h" #include "exitcode.h" #include "machine.methods.h" int main() { struct Machine machine; struct Machine * mm = &machine; newMachine(mm, stdin, 100, 10); script: while (!mm->peep != EOF) { // print lines containing the text pep if (mm->peep == EOF) { break; } else { readChar(mm); } /* read */ if (endsWith(mm->buffer.workspace, "\n")) { put(mm); replace(mm, "pep", ""); /* replace */ if (strcmp(mm->buffer.workspace, mm->tape.cells[mm->tape.currentCell].text) != 0) { swap(mm); printf("%s", mm->buffer.workspace); /* print */ } mm->buffer.workspace[0] = '\0'; /* clear */ } } }