modified parse_fasta()