V8/usr/src/cmd/pcc1/mip/fcomm2.c

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