3BSD/usr/src/cmd/mip/fcomm2.c

# define FORT
# include "mfile2"
# include "common"