OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [pr41016.c] - Blame information for rev 300

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 297 jeremybenn
typedef struct _IO_FILE FILE;
2
void
3
CompareRNAStructures (FILE * ofp, int start, int L, char *ss_true, char *ss)
4
{
5
  int i;
6
  float agree = 0.;
7
  float pairs = 0.;
8
  float pairs_true = 0.;
9
  for (i = 0; i < L; i++)
10
    {
11
      pairs_true += 1.;
12
      agree += 1.;
13
    }
14
  if (((int) pairs % 2 != 0) || ((int) pairs_true % 2 != 0)
15
      || ((int) agree % 2 != 0))
16
    Die ("Error in CompareRNAStrutures(); odd number of paired nucleotides\n");
17
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.