obtain_char
extern int obtain_char(struct input_file *);
#define gpbc() (bp > bufbase) ? *--bp : obtain_char(infile+ilevel)
