Red Bear OS
1b3e94a20d
From release 0.1.0 pre-patched archive. This includes all Red Bear modifications previously maintained as patches in local/patches/relibc/.
38 lines
1.4 KiB
C
38 lines
1.4 KiB
C
#include <stdio.h>
|
|
int main() {
|
|
FILE *f = fopen("stdio/ungetc_ftell.c", "r");
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
ungetc('\n', f);ungetc('d', f);
|
|
ungetc('l', f); ungetc('r', f);
|
|
ungetc('o', f); ungetc('w', f);
|
|
ungetc(' ', f); ungetc('o', f);
|
|
ungetc('l', f); ungetc('l', f);
|
|
ungetc('e', f); ungetc('h', f);
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
printf("%c, %ld\n", getc(f), ftell(f));
|
|
}
|