OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [pr41016.c] - Diff between revs 297 and 338

Only display areas with differences | Details | Blame | View Log

Rev 297 Rev 338
typedef struct _IO_FILE FILE;
typedef struct _IO_FILE FILE;
void
void
CompareRNAStructures (FILE * ofp, int start, int L, char *ss_true, char *ss)
CompareRNAStructures (FILE * ofp, int start, int L, char *ss_true, char *ss)
{
{
  int i;
  int i;
  float agree = 0.;
  float agree = 0.;
  float pairs = 0.;
  float pairs = 0.;
  float pairs_true = 0.;
  float pairs_true = 0.;
  for (i = 0; i < L; i++)
  for (i = 0; i < L; i++)
    {
    {
      pairs_true += 1.;
      pairs_true += 1.;
      agree += 1.;
      agree += 1.;
    }
    }
  if (((int) pairs % 2 != 0) || ((int) pairs_true % 2 != 0)
  if (((int) pairs % 2 != 0) || ((int) pairs_true % 2 != 0)
      || ((int) agree % 2 != 0))
      || ((int) agree % 2 != 0))
    Die ("Error in CompareRNAStrutures(); odd number of paired nucleotides\n");
    Die ("Error in CompareRNAStrutures(); odd number of paired nucleotides\n");
}
}
 
 

powered by: WebSVN 2.1.0

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