/* Runtime library */ # include /* Lread is an implementation of the "read" construct */ extern int Lread () { int result; printf ("> "); fflush (stdout); scanf ("%d", &result); return result; } /* Lwrite is an implementation of the "write" construct */ extern int Lwrite (int n) { printf ("%d\n", n); fflush (stdout); return 0; }