def get_f77flags(src):
flags = {}<EOL>f = open_latin1(src, '<STR_LIT:r>')<EOL>i = <NUM_LIT:0><EOL>for line in f:<EOL><INDENT>i += <NUM_LIT:1><EOL>if i><NUM_LIT:20>: break<EOL>m = _f77flags_re.match(line)<EOL>if not m: continue<EOL>fcname = m.group('<STR_LIT>').strip()<EOL>fflags = m.group('<STR_LIT>').strip()<EOL>flags[fcname] = split_quoted(fflags)<EOL><DEDENT>f.close()<EOL>return flags<EOL>
Search the first 20 lines of fortran 77 code for line pattern
  `CF77FLAGS(<fcompiler type>)=<f77 flags>`
Return a dictionary {<fcompiler type>:<f77 flags>}.