ack/lang/basic/src.old/compile.c
1985-01-17 14:10:27 +00:00

21 lines
304 B
C

#include "bem.h"
#ifndef NORSCID
static char rcs_id[] = "$Header$" ;
#endif
/* compile the next program in the list */
/* Here we should open the input file. (for the future) */
FILE *yyin;
compileprogram(dummyprog)
char *dummyprog;
{
while( getline())
(void) yyparse();
(void) fclose(yyin);
}